./ftp.pl
Net::FTP>>> Net::FTP(2.77)
Net::FTP>>>   Exporter(5.66)
Net::FTP>>>   Net::Cmd(2.29)
Net::FTP>>>   IO::Socket::INET(1.33)
Net::FTP>>>     IO::Socket(1.34)
Net::FTP>>>       IO::Handle(1.33)
Net::FTP=GLOB(0x83b0060)<<< 220 FTP on srV41pl2ap01dxoh
Net::FTP=GLOB(0x83b0060)>>> USER anonymous
Net::FTP=GLOB(0x83b0060)<<< 331 Please specify the password.
Net::FTP=GLOB(0x83b0060)>>> PASS ....
Net::FTP=GLOB(0x83b0060)<<< 230 Login successful.
Net::FTP=GLOB(0x83b0060)>>> CWD pub
Net::FTP=GLOB(0x83b0060)<<< 250 Directory successfully changed.
Net::FTP=GLOB(0x83b0060)>>> EPSV
Net::FTP=GLOB(0x83b0060)<<< 229 Entering Extended Passive Mode (|||40081|)
Net::FTP=GLOB(0x83b0060)>>> NLST
Net::FTP=GLOB(0x83b0060)<<< 150 Here comes the directory listing.
Net::FTP=GLOB(0x83b0060)<<< 226 Directory send OK.
file: file
file: tr
Net::FTP=GLOB(0x83b0060)>>> EPSV
Net::FTP=GLOB(0x83b0060)<<< 229 Entering Extended Passive Mode (|||40094|)
Net::FTP=GLOB(0x83b0060)>>> RETR file
Net::FTP=GLOB(0x83b0060)<<< 150 Opening BINARY mode data connection for file (12 bytes).
Net::FTP=GLOB(0x83b0060)<<< 226 File send OK.
Net::FTP=GLOB(0x83b0060)>>> QUIT
Net::FTP=GLOB(0x83b0060)<<< 221 Goodbye.