Help for this page
#!/usr/bin/perl -w use feature 'say'; ... say "Entries found = ". scalar @ls; $ftp->close();
Net::FTP>>> Net::FTP(3.11) Net::FTP>>> Exporter(5.73) ... Net::FTP=GLOB(0x363bc80)>>> TYPE I Net::FTP=GLOB(0x363bc80)<<< 530 Access denied. Can't switch to binary mode: at /home/username/bin/perltest line 9.