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

Re: [MacPerl] Q on Mac Time Zones



At 16.54 +0100 1999-01-08, Ronald J. Kimball wrote:
>Try this instead:
>
>  #!perl
>  use Time::Local;
>  $diff = (timelocal(localtime) - timelocal(gmtime)) / 36;
>  $diff = sprintf "%+0.4d", $diff;  # add sign, leading zero(es)
>  print $diff;

Works for me! And your solution is probably faster.

/Cajo.

___Carl_Johan_Berglund_________________________
   Adverb Information
   carl.johan.berglund@adverb.se
   http://www.adverb.se/



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