use vars '$start'; sub Start_timer : Test(startup) { $start = time; ... }; sub End_timer : Test(shutdown) { print time - $start; ... } #### sub get_or_init_start_time { state $start ||= time; }