|
Nmap::Scanner is a Perl module to perform and manipulate nmap scans using perl. SYNOPSIS Perl extension for performing nmap (www.insecure.org/nmap) scans. use Nmap::Scanner; # Batch scan method my $scanner = new Nmap::Scanner; $scanner->tcp_syn_scan(); $scanner->add_scan_port(1-1024); $scanner->add_scan_port(8080); $scanner->guess_os(); $scanner->max_rtt_timeout(200); $scanner->add_target(some.host.out.there.com.org); # $results is an instance of Nmap::Scanner::Backend::Results my $results = $scanner->scan(); # Print the results out as an well-formatted XML document print $results->as_xml(); # Event scan method using *new* easier way to set scan options. my $scanner = new Nmap::Scanner; $scanner->register_scan_started_event(&scan_started); $scanner->register_port_found_event(&port_found); $scanner->scan(-sS -p 1-1024 -O --max-rtt-timeout 200 somehost.org.net.it); sub scan_started { my $self = shift; my $host = shift; my $hostname = $host->name(); my $addresses = join(,, map {$_->address()} $host->addresses()); my $status = $host->status(); print "$hostname ($addresses) is $statusn"; } sub port_found { my $self = shift; my $host = shift; my $port = shift; my $name = $host->name(); my $addresses = join(,, map {$_->addr()} $host->addresses()); print "On host $name ($addresses), found ", $port->state()," port ", join(/,$port->protocol(),$port->portid()),"n"; } This set of modules provides perl class wrappers for the network mapper (nmap) scanning tool (see http://www.insecure.org/nmap/). Using these modules, a developer, network administrator, or other techie can create perl routines or classes which can be used to automate and integrate nmap scans elegantly into new and existing perl scripts. If you dont have nmap installed, you will need to download it BEFORE you can use these modules. Get it from http://www.insecure.org/nmap/. You will need nmap 3.10+ installed to use all the features of this module..
|
Windows Software
Albina Merfyn - I find this to be really easy to use. I can...
