http://www.perlmonks.org?node_id=553537


in reply to Re: Find Execution time of perl script??
in thread Find Execution time of perl script??

No need to calculate start time: it is always available through $^T (see perlvar).

print time - $^T;
And for programs with so few liners, there is probably little need for use strict, use warnings, meaningful variable names, etc,. ( Some posters seem too vocal on such matters; with a little more encouragement, they might also advise on the java-way of doing things.)