|
[Date Prev] [Date Next] [Thread Prev] [Thread Next] [Date Index] [Thread Index]
Stephen Gran:
> #!/usr/bin/perl
> my $atime = my $mtime = time;
> utime $atime, $mtime, @ARGV;
Starting in some not-too-recent version of Perl, you can omit the
atime or mtime values if you want Perl to supply the current time. So
your program can be reduced to one line:
#!/usr/bin/perl
utime undef, undef, @ARGV;
___________________________________________________________________________
Philadelphia Linux Users Group -- http://www.phillylinux.org
Announcements - http://lists.phillylinux.org/mailman/listinfo/plug-announce
General Discussion -- http://lists.phillylinux.org/mailman/listinfo/plug
|
|