Help for this page

Select Code to Download

Select or download this

# see if the file is more than about one hour old
if (-M $logfile > 0.042) { ... }

Select or download this

#!/usr/bin/perl

...
__DATA__
MTIME: 1.15740740740741e-05
MTIME: 0.000104166666666667