Shell Programming and Scripting

Found:
00000000|2011-Inactive-Segment|2|1|03/15/2011 0:00:00

Expected:
00000000|2011-Inactive-Segment|2|1|15-MAR-2011

BEGIN {
   mon="JAN|FEB|MAR|APR|MAY|JUN|JUL|AUG|SEP|OCT|NOV|DEC"
   monN=split(mon, monA, "|");
}
{
  n=split($NF,a,"[/ ]")
  $NF=sprintf("%02d-%s-%d",a[2], monA[a[1]+0], a[3])
}
1

BEGIN {
   mon="JAN|FEB|MAR|APR|MAY|JUN|JUL|AUG|SEP|OCT|NOV|DEC"
   # Create an array where mon[1]=JAN, mon[2]=FEB, etc.
   monN=split(mon, monA, "|");
}
{
  # NF is the number of fields, $NF is the very last field.
  # So split the very last field into an array on the / or ' ' chars.
  n=split($NF,a,"[/ ]")
  # convert months 1-12 into JAN-DEC by looking them up in monA.
  # then print the whole mess in the format below, just like C or shell printf.
  $NF=sprintf("%02d-%s-%d",a[2], monA[a[1]+0], a[3])
}
# When the following expression is true, lines are printed.
# 1 is always true, so it prints every line.
1