pattern.awk
### pattern.awk
###
### Loop through a CSV file and for every occurence of a DATE field 
### with format "MM/DD/YYYY, change to "YYYYMMDD".  This script was 
### used during a UNIX to AS400 conversion
###
### Usage:  pattern.sh pattern.awk datafile.csv
{
    lstring=$1
    for ( i =2; i<=NF; i++ )
    {
        if ($i ~ /\"[0-1][1-9]\/[0-9][1-9]\/[1-2][0,9][0-9][0-9]\"/)
        {
          dp = index($i,"\/")
          month = substr($i, dp - 2, dp - 1)
          month1 = substr(month,1,2)
          day = substr($i, dp, dp)
          day1 = substr(day,2,2)
          year = substr($i, dp + 4,4 )
          lstring=sprintf(lstring","year month1 day1)
        }
        else
        {
           lstring=sprintf(lstring","$i)
        }
    }
    print lstring
}