how to print modification date

[Stephan Hochhaus]

Hello list,

I tried to dig my way through my newly acquired Perl ina  nutshell and 
Learning Perl, but I couldn't find a satisfying solution to my problem:

How can I print the last modification date of a file? It should work on 
different systems (*nix and OS X, Win32 is nice to have but not a mus). 
Any pointers to a solution are very welcome!

Feliz navidad,

Stephan

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 

RE: how to print modification date

[Bob Showalter]

Stephan Hochhaus wrote:
> Hello list,
> 
> I tried to dig my way through my newly acquired Perl ina nutshell and
> Learning Perl, but I couldn't find a satisfying solution to my
> problem: 
> 
> How can I print the last modification date of a file? It should work
> on different systems (*nix and OS X, Win32 is nice to have but not a
> mus). Any pointers to a solution are very welcome!

The stat() function returns a list of information about a file, including
the modification timestamp. This value is in epoch seconds. You can convert
it to a printable date using localtime() or gmtime():

   $mtime = (stat "/etc/passwd")[9];
   print scalar localtime $mtime;

This will work on all the platforms you listed. If you want more control
over the formatting, consider using POSIX strftime() function.

perldoc -f stat
perldoc -f localtime
perldoc -f gmtime
perldoc POSIX

HTH

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]