perl-File-Touch

Here's a list of arguments that can be used with the object-oriented
contruction:

atime_only => [0|1]

If nonzero, change only the access time of files. Default is zero.

mtime_only => [0|1]

If nonzero, change only the modification time of files. Default is zero.

no_create => [0|1]

If nonzero, do not create new files. Default is zero.

reference => $reference_file

If defined, use timestamps from this file instead of current time. The
timestamps are read from the reference file when the object is created, not
when '<-'touch>> is invoked. Default is undefined.

time => $time

If defined, then this value will be used for both access time and
modification time, whichever of those are set. This time is overridden by
the 'atime' and 'mtime' arguments, if you use them.

atime => $time

If defined, use this time (in epoch seconds) instead of current time for
access time.

mtime => $time

If defined, use this time (in epoch seconds) instead of current time for
modification time.

          

---

License: Artistic-1.0 or GPL-1.0+
URL: http://search.cpan.org/dist/File-Touch/