$time_start = strftime("%H:%M:%S", localtime(time));

&my_rotine();

$time_end = strftime("%H:%M:%S", localtime(time));

$duration = $time_end - $time_start;