Help for this page

Select Code to Download


  1. or download this
    my $path = "/very/long/path/here";
      # or maybe: opendir(my $path, "/very/long/path/here");
    
    move($abc1,"$path/compleat/");
    
     foreach my $file (<$path/MHSAPC/*csv>){chomp; ... ## read also about 
    +glob
    
  2. or download this
    $mmtime = (stat($file))[9]; 
    if ($mmtime > 600){do something ....} ; 
        ## note that these are seconds, 10 min = 600 sec
    
  3. or download this
    if ($abc1 eq "")
    {
    next;
    }