use Timer::Runtime

Example: duration.pl

#!/usr/bin/perl

use Timer::Runtime;

print "hi\n";
[download]

Outputs:

$ perl duration.pl
duration.pl Started: Fri Aug  5 01:48:14 2016
hi
duration.pl Finished: Fri Aug  5 01:48:14 2016, elapsed time = 00:00:0
+0.000398
$
[download]