use Net::FTP; # Passive mode can be set with object initiation my $ftp = Net::FTP->new( $hostname, Debug => 1, Passive => 1 ) or die $!; $ftp->login( $user, $password ); # Or with $object->pasv; $ftp->pasv;