my ($h,$m,$s) = (gmtime($t2-$t1))[2,1,0];