Re: [MacPerl] Creation/Modification Date

[Adrian Howard <adrianh@victoriareal.co.uk>]

Use stat to get them:

	($atime,$mtime) = (stat($filename))[8..9]

and utime to set them

	utime $atime, $mtime, $filename;

[sprinkle with error checking code as appropriate]

Adrian


At 9:56 am +0100 6/8/98, Jeff at MacTech wrote:
>Is there a way to get (and set, for that matter) a file's creation and
>modification dates in MacPerl? I didn't see anything in the pods for the
>File-related toolbox modules. (And -M doesn't quite cut it, since its
>value will change during the run of a script.)
>--
>__________________________________________________________________________
>
>Jeff Clites                Online Editor           http://www.MacTech.com/
>online@MacTech.com         MacTech Magazine
>__________________________________________________________________________

----
Adrian Howard. adrianh@victoriareal.co.uk. Head Techie. Victoria Real Ltd
URL: http://www.victoriareal.co.uk/ v. +44 1273 774469 f. +44 1273 779960



***** Want to unsubscribe from this list?
***** Send mail with body "unsubscribe" to mac-perl-request@iis.ee.ethz.ch