Perl – Code Execution Time with accuracy – Time::HiRes How long does it take to execute some code?   use Time::HiRes qw( time ); my $start = time(); // Code goes here sleep 10; my $end = time(); print “SPRINTF: “; printf(“%.6f\n”, $end – $start);