$ cat EchoStartStop.pm;

package EchoStartStop;
use POSIX();
BEGIN {
    print "Started: ",POSIX::strftime( "%a %b %d %T %Z %Y", localtime ),"\n";

}
END {
    print "Stopped: ",POSIX::strftime( "%a %b %d %T %Z %Y", localtime ),"\n";

}

1;

##</code><code>##

$ perl -le"print scalar localtime"
Thu Aug 12 12:19:10 2010