C:\Perl>perl l.pl
Net::FTP>>> Net::FTP(2.75)
Net::FTP>>>   Exporter(5.58)
Net::FTP>>>   Net::Cmd(2.26)
Net::FTP>>>   IO::Socket::INET(1.29)
Net::FTP>>>     IO::Socket(1.29)
Net::FTP>>>       IO::Handle(1.25)
Net::FTP=GLOB(0x18331d8)<<< 220 osmosis FTP server ready.
Net::FTP=GLOB(0x18331d8)>>> user metrica
Net::FTP=GLOB(0x18331d8)<<< 331 Password required for metrica.
Net::FTP=GLOB(0x18331d8)>>> PASS ....
Net::FTP=GLOB(0x18331d8)<<< 230 User metrica logged in.
Net::FTP=GLOB(0x18331d8)>>> CWD /apps/inst1/metrica
Net::FTP=GLOB(0x18331d8)<<< 250 CWD command successful.
Net::FTP=GLOB(0x18331d8)>>> PASV
Net::FTP=GLOB(0x18331d8)<<< 227 Entering Passive Mode (192,168,10,240,227,44)
Net::FTP=GLOB(0x18331d8)>>> PASV
Net::FTP=GLOB(0x18331d8)<<< 227 Entering Passive Mode (192,168,10,240,227,44)
Net::FTP=GLOB(0x18331d8)>>> NLST
Net::FTP=GLOB(0x18331d8)<<< 150 Opening ASCII mode data connection for file list
.
Net::FTP=GLOB(0x18331d8)<<< 226 Transfer complete.
Files :AlarmManagement-CS-DBElements-DBLoader-DBServices-DataSources-Extenders-E
xternal-GroupingService-Installer-MLEditor-MetaLayer-PMhelp-ReportDesigner-Repor
ting-SPRegistry-Security-StartStop-SystemManagement-SystemTPhelp-TechnologyPacks
-Uiweb-antony.txt-cell-tch-REPRT_0610-export-config-file.xml-cell-tch-argan-expo
rt-config-file.xml-cell-tch-rflosses-export-config-file.xml-cell_voice_traffic_r
aw_spr-param.xml-etc-ext-install_setup.ksh-logs-maeve-metrica_healthcheck.html-n
ohup.out-one.pl-setup.ksh-setup.tpl-setup_appserver.ksh-setup_informix.ksh-setup
_java.ksh-setup_openfusion.ksh-update3FFPromo.pl-utils