Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -w
    
    ...
    my $password='xxxx';
    my $ftp=Net::FTP -> new($hostname) or die ("Connect failed");
    $ftp->quit;
    
  2. or download this
    Name "main::username" used only once: possible typo at filedate.pl lin
    +e 15.