NAME

Net::Scan::Ftp::Anonymous - scan for anonymous read/write access FTP servers

SYNOPSIS

  use Net::Scan::Ftp::Anonymous;

  my $host = $ARGV[0];

  my $scan = Net::Scan::Ftp::Anonymous->new({
    host    => $host,
    timeout => 5,
    verbose => 1,
    debug   => 0 
  });

  my $results = $scan->scan;

  print "$host $results\n" if $results;

DESCRIPTION

This module permit to scan for anonymous read/write access FTP servers.

METHODS

new

The constructor. Given a host returns a Net::Scan::Ftp::Anonymous object:

  my $scan = Net::Scan::Ftp::Anonymous->new({
    host      => "127.0.0.1",
    port      => 21,
    timeout   => 5,
    directory => 'test007',
    user      => 'anonymous',
    password  => 'postmaster@127.0.0.1',
    verbose   => 1,
    debug     => 0 
  });

Optionally, you can also specify :

port: Remote port. Default is 21 tcp;
timeout: Default is 8 seconds;
directory: Directory created to verify write access. It will be delete after check. Default is "test007";
user: Default is 'anonymous';
password: Defaults is 'postmaster@127.0.0.1';
verbose: Set to 1 enable verbose; 0 display "r" or "w", 1 display "read access" or "write access" as output;
debug: Set to 1 enable debug. Debug displays "connection refused" when an FTP server is unrecheable. Default is 0;