Time::HiRes qw/gettimeofday tv_interval/;
my $start_time = [gettimeofday];

# AT end of page
my $total_time = tv_interval($start_time);
print $start_time