$ftp = Net::FTP->new("myserver@here.com", Debug => 1)
    || die "Unable to connect: $@\n";