Port gigasecond to perl5