in reply to Reading every file in a directory
my $CurrentTime = `perl -e 'print time, '`;
Read perlintro the use my $CurrentTime = time;