Question

I have a standalone version of Perl for Windows (5.004) that does not include any modules. I want to run a script to check the last modified time of several files.

I could use File::qstat, but that module doesn’t exist (the copy of Perl is in version control, so it can be used by people who do not have ActivePerl or Strawberry Perl installed).

It seems like there are three options:

1. Figure out how to put a newer, more functional, standalone Perl installation into version control
2. Just add the File::Stat module somehow, and do use lib (does that work on 5.004?)
3. Use some built-in functions included in 5.004 for Windows to get the file status.

How can I do this?

Answer 1

perl -le '$file=shift or die;print scalar localtime((stat($file))[9])' file

See stat .