$ftp = Net::FTP->new($destination, Debug => 1, Passive =>1) || die "Couldn't connect! $!\n";