package Timer::StartStop; use strict; use Time::Elapse; Time::Elapse->lapse( my $now); BEGIN { print "$0 Started: " . ( scalar localtime ) . "\n"; } END { print "$0 Finished: " . ( scalar localtime ) . ", time = $now\n"; } 1;