$atime = $mtime = time;
utime $atime, $mtime, @INC;