require 5.6.1;
use Net::FTP;
my $ftp = Net::FTP->new('ostrich',Debug=>1,Passive=>1) or die "not connected $!";
print "connected successfully\n";

##</code><code>##

The error is 
not connected Invalid argument at - line 3.