# get the difference between two epoch times and cope with 2038
sub diff_time {
    my ( $begin, $end ) = @_;
    # for now all we need is:
  return $begin - $end;
    # Jan 19 03:14:07 2038 we have potential rollovers so
    require Math::BigInt;
    # blah
}