Help for this page

Select Code to Download


  1. or download this
    {
        open local(*STDOUT), "> $log" or die $!;
        open local(*STDERR), ">>&STDOUT" or die $!;
        flock(STDOUT, LOCK_EX | LOCK_NB) or die $!;
    
  2. or download this
        truncate STDOUT, 0; #clear out STDOUT to start with a fresh log fi
    +le.
        chdir $local_dir or die "Cannot change to $local_dir. $!";
    
  3. or download this
        system $pkunzip, '-doA', "$local_dir/$file";
    }