in reply to Best way to sum an array?

Or just say:

use Time::HiRes qw( time ); my $start = time; # your code here printf "Took %.3f seconds\n", time - $start;

For deeper insights see Devel::NYTProf

Good advice was given above.

Regards, Karl

«The Crux of the Biscuit is the Apostrophe»

Furthermore I consider that Donald Trump must be impeached as soon as possible