my $mtime = (stat "$temp1") [9];
      my $older=60*60*24;
      my $diff=$today-$mtime;
      $diff=$diff/$older;
      print " DIFF $diff  ";
      if ($diff >3)