Berkeley CSUA MOTD:Entry 24461
Berkeley CSUA MOTD
 
WIKI | FAQ | Tech FAQ
http://csua.com/feed/
2025/07/09 [General] UID:1000 Activity:popular
7/9     

2002/4/17-18 [Computer/SW/Languages/Perl] UID:24461 Activity:kinda low
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;    ;-)
Cache (40 bytes)
hpiers.obspm.fr/eop-pc -> hpiers.obspm.fr/eop-pc/
FRAME: menu FRAME: mission References 1.