my $taioffset = 37;

...

    my $now = $time + $taioffset;