Chas Owens wrote:>
#!/usr/bin/perl

for my $file (<.* *>) {
       print "$file is ", int(24*60 * -M $file), " minutes old\n";
}

Thanks Chas!  Exactly what I was looking for =).

Cheers
-Chris

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/


Reply via email to