会python真的可以为所欲为0(回)
359天前
这里还有人吗1(回)
544天前这里还有人吗0(回)
544天前
每天面对着电脑屏幕，敲打键盘。我所面对的并不只是代码，而是一种生活方式。0(回)
769天前到处都是羊，不想上班0(回)
849天前
鸽子
0(回)
853天前#----------------------------- |
( $READTIME, $WRITETIME ) = ( stat ( $filename ) ) [8,9]; |
utime ( $NEWREADTIME, $NEWWRITETIME, $filename ); |
#----------------------------- |
$SECONDS_PER_DAY = 60 * 60 * 24; |
( $atime, $mtime ) = ( stat ( $file ) ) [8,9]; |
$atime -= 7 * $SECONDS_PER_DAY; |
$mtime -= 7 * $SECONDS_PER_DAY; |
utime ( $atime, $mtime, $file ) |
or die "couldn't backdate $file by a week w/ utime: $!"; |
#----------------------------- |
$mtime = ( stat $file ) [9]; |
utime ( time, $mtime, $file ); |
#----------------------------- |
use File::stat; |
utime ( time, stat ( $file )->mtime, $file ); |
#----------------------------- |
# download the following standalone program |
#!/usr/bin/perl -w |
# uvi - vi a file without changing its access times |
$file = shift or die "usage: uvi filename\n"; |
( $atime, $mtime ) = ( stat ( $file ) ) [8,9]; |
system ( $ENV {EDITOR} || "vi", $file ); |
utime ( $atime, $mtime, $file ) |
or die "couldn't restore $file to orig times: $!"; |
#----------------------------- |
