touch.pl
资源名称:8202s.rar [点击查看]
上传用户:poi891205
上传日期:2013-07-15
资源大小:9745k
文件大小:0k
源码类别:
DVD
开发平台:
C/C++
- #
- #
- #
- for ($argvcnt=0; $argvcnt<@ARGV && $ARGV[$argvcnt] =~ /^-(.*)/; $argvcnt++)
- {
- if ($ARGV[$argvcnt] =~ /^-z/)
- {
- $argvcnt++;
- last;
- }
- }
- $when = time();
- for (; $argvcnt<@ARGV; $argvcnt++)
- {
- utime($when, $when, <$ARGV[$argvcnt]>);
- }