请问如何修改文件而不改变文件的修改时间？？？？？

freewind31

请问如何修改文件而不改变文件的修改时间？？？？？
我想到的是先去的文件的上次修改时间，然后修改文件，然后再把文件修改时间改为前面取的时间，但是不知道怎么实现

兰花仙子

man touch:

touch - change file timestamps

freewind31

回复 2# 兰花仙子


    可是，仙子姐姐，我是在windows xp环境下

能取得文件的上次修改时间，怎么在本次修改完后把时间改为上次修改时间呢

1. #!/usr/bin/perl
   
2. 
   
3. $mtime=(stat("gogo.pl"))[9];
   
4. my ($sec,$min,$hour,$day,$month,$year,$wday,$yday,$isdst) = localtime($mtime);
   
5. $month+=1;
   
6. $sec  = ($sec<10)?"0$sec":$sec;
   
7. $min  = ($min<10)?"0$min":$min;
   
8. $hour = ($hour<10)?"0$hour":$hour;
   
9. #$day = ($day<10)?"0$day":$day;
   
10. #$month  = ($month<=9)?"0".($month):$month;
    
11. $year+=1900;
    
12. 
    
13. my $fileModifyTime=$year."年".$month."月".$day."日, ".$hour.":".$min.":".$sec;
    
14. print $fileModifyTime;

复制代码

xfoucs

回复 1# freewind31


    perldoc -f utime

freewind31

回复 4# xfoucs


    嗯，我也查到这个了，搞定了