There is nothing in concrete in Perl, so up to the individual. To me
for this type of action, you create your own. You can posibbly use
Date::Manip or one of the other Date routines, but alot of times this add a
lot of extra overhead for piece of data you want to work with.
You
Chris wrote:
>
> How to change "20020706" to "July 6, 2002"?
One way:
my $date = '20020706';
my @months = qw(
January February March April May June July
August September October November December
);
my ( $year, $mon, $day ) = unpack 'a4a2a2', $date;
my $newdate = "$months{$mon - 1}
PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Sunday, July 07, 2002 9:32 AM
Subject: Re: How to change "20020706" to "July 6, 2002"?
> Chris wrote:
> >
> > How to change "20020706" to "July 6, 2002"?
>
>
> One way:
>
> m
ay, Jun, Jul, Aug, Sep, Oct, Nov,
>Dec);
>my $out = "$months[$2] $3, $1" if ( $in =~ /(\d{4})(\d{2})(\d{2})/);
>
>Rgds,
>Connie
>
>
>
>
>- Original Message -
>From: "John W. Krahn" <[EMAIL PROTECTED]>
>To: <[EMAIL PROTECTED]&