4/16 What's the best way for my Perl program to get the TAI-UTC difference?
That being the total number of leap seconds.
\_ What's TAI? You can get your UTC offset with:
use POSIX 'strftime';
$off = strftime('%z',localtime);
which will give you a string like '-0700'
Don't know of an easier way... --dbushong
\_ Thanks, but that's not what I'm looking for.
TAI : Temps Atomique International. (International Atomic Time)
It's currently 32 seconds ahead of UTC. It counts continuous
seconds. Leap seconds are added to UTC to keep UTC
synchronized with earth's rotation. It's explained
under "Leap Seconds" at http://hpiers.obspm.fr/eop-pc
\_ $TIA = $UTA + 32; ;-) |