use Time::HiRes qw(gettimeofday tv_interval);

my $start_time;
BEGIN { $start_time = [gettimeofday()]; }  # Zeit zu Beginn des Ladens