use Time::Stopwatch;

tie my $timer, 'Time::Stopwatch';

#.. your code here

print "Completed in $timer seconds";