[Date Prev][Date Next][Thread Prev][Thread Next] [Search] [Date Index] [Thread Index]

Re: [MacPerl] I am stumped!



At 18.07 -0500 1999.02.23, Walter Torres wrote:
>Has any one ever been able to get the Time Zone off the Mac?
>
>Please enlighten me! ;)

>From Ronald Kimball:

  #!perl
  use Time::Local;
  $diff = (timelocal(localtime) - timelocal(gmtime)) / 36;
  $diff = sprintf "%+0.4d", $diff;  # add sign, leading zero(es)
  print $diff;

--
Chris Nandor          mailto:pudge@pobox.com         http://pudge.net/
%PGPKey = ('B76E72AD', [1024, '0824090B CE73CA10  1FF77F13 8180B6B6'])

***** Want to unsubscribe from this list?
***** Send mail with body "unsubscribe" to mac-perl-request@iis.ee.ethz.ch