Help for this page

Select Code to Download


  1. or download this
    use Win32API::File::Time qw{:win};
($atime, $mtime, $ctime) = GetFileTime ($filename);
SetFileTime ($filename, $atime, $mtime, $ctime);
  2. or download this
    perl -MFile::Glob=bsd_glob -le '$,=qq(\t);print$_,(stat)[10,9,8]for bs
+d_glob(q(*))'