rbc has asked for the wisdom of the Perl Monks concerning the following question:
And here's the output#!/usr/bin/perl use Date::Manip; if ( !defined($ENV{'TZ'}) ) { print "Tz not set!\n"; $ENV{'TZ'} = "-0800"; } my $time_zone = $ENV{'TZ'}; my @strings = ( "1999/12/12", "02-03-01", "10-13-97", "2001-11-28" ); foreach $string ( @strings ) { my $date = &ParseDate( \$string ); print "string is $string date is $date \n"; }
Here's my questions:Tz not set! string is 1999/12/12 date is 1999121200:00:00 string is 02-03-01 date is 2002030100:00:00 string is 10-13-97 date is string is 2001-11-28 date is 2001112800:00:00
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: Date::Manip question.
by zengargoyle (Deacon) on Mar 20, 2002 at 20:46 UTC | |
|
Re: Date::Manip question.
by metadoktor (Hermit) on Mar 20, 2002 at 20:35 UTC |