Re^2: Deleting old files from directory

[Anonymous Monk]

in reply to Re: Deleting old files from directory
in thread Deleting old files from directory

this is what you mean?

  foreach (grep {-f $_ and 10 < -M _ } @files) {      
    print "\n Deleting::: $_\n";
    unlink $_;
   }

[Anonymous Monk]

Almost

Simply replace EXISTING grep block with mine, no need to change anything else