time関数 - エポックから現時点までの経過秒数を取得する

2008-10-08

　エポックとは時刻の基準となるある時点のことです。多くのシステムでは、協定世界時の 1970年1月1日0時0分0秒00:00:00がエポックとなります。time関数を使用すればここからエポックから数えた秒数を取得できます。

my $sec_from_epoch = time;

　time関数を使用するとエポックから数えた秒数を取得することができます。この秒数はうるう秒が考慮されていないので実際の時刻と少しの誤差があります。(うるう秒とは毎年地球の自転が遅れるために数年に一度時刻の調整のために挿入される秒のことです。)

　エポックとは時刻の基準となるある時点のことです。多くのシステムでは、協定世界時の 1970年1月1日0時0分0秒00:00:00がエポックとなります。

　32bitのマシンにおいてはエポックを基準として、-2,147,483,648秒～2,147,483,647秒までの時刻を表現することができます。

　日付に直すと（協定世界時で)1901年12月13日(金)20時45分52秒から2038年1月19日(火)3時14分7秒までとなります。　この範囲を超える時刻の計算はPerlの標準関数では行うことができません。

　time関数を使ったサンプルです。

use strict;
use warnings;

# エポックから現時点までの経過秒数を取得する
my $sec_from_epoch = time;

print "$sec_from_epoch sec\n";