my $ftp = Net::FTP->new($hostname, Debug => 1, Passive => 1);