Alaska Perl Mongers Site reworked. . .

[Leif Sawyer]

I've just stumbled across an interesting problem
that I can't dredge up the answer to.

I need a function to return the offset for the current timezone.

I can do the following:

perl -e 'use POSIX; print POSIX::strftime("%T %D (%Z)\n")'

which outputs

11:10:00 07/28/99 (AKDT)

What i need is to have:

11:10:00 07/28/99 -8 (AKDT)

Any thoughts?
=================================================
Mailing list info:  If at any time you wish to (un|re)subscribe to
the list send the request to majordomo at hfb.pm.org.  All requests
should be in the body, and look like such
                  subscribe anchorage-pm-list
                  unsubscribe anchorage-pm-list