$delete_time = 3#,
$f="foo1.txt";$f1="foo2.txt";$f2="foo3.txt";
#'                    '
 if                       #'
(-M $f  > $delete_time) {system "rm",$f;}if 
(-M $f1 > $delete_time) {system "rm",$f1;}if 
(-M $f2 > $delete_time) {system "rm",$f2;}}
         print "  "
        exit;
[download]