Date conversion

aller_in · May 6, 2009, 3:28pm

vgersh99:

BEGIN {
  monN=split("JAN FEB MAR APR MAY JUN JUL AUG SEP OCT NOV DEC", months)
  for(i=1; i<=monN; i++) {
   months[months]=i;
   delete months;
  }
}
 
{ gsub(":", "", $3);printf("2009%02d%02d%04d\n",  months[toupper($1)], $2, $3) }

And it worked PERFECTLY!!!!
Thanks for your help GURU in Unix! Appreciate it!

summer_cherry · May 7, 2009, 6:11am

perl:

my %hash=(MAY=>'05',SEP=>'09');
my @arr=('MAY 05 2005 01:15:00PM','SEP 05 2008 01:15:00PM');
map {s/^([A-Z]{3}) ([0-9]{2}) ([0-9]{4}) (.*)$/$3."\/".$hash{$1}."\/".$2." ".$4/e;print $_,"\n";} @arr;
__END__
output is
2005/05/05 01:15:00PM
2008/09/05 01:15:00PM