On Fri, 5 Sep 2003, David Wheeler wrote: > Bah. Thanks for that. Does this work? > > #!/usr/bin/perl -w > > use strict; > use POSIX qw(tzset); > print scalar localtime, $/; > { > local $ENV{TZ} = "Asia/Tokyo"; > tzset; > print scalar localtime, $/; > } > tzset; > print scalar localtime, $/;
yup /*======================= House Absolute Consulting www.houseabsolute.com =======================*/