Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -w
use feature 'say';
...
say "Entries found = ". scalar @ls;

$ftp->close();
  2. or download this
    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.