# dots2_history.ak  four fields separated by three dots update project.history 

BEGIN {FS = "/" # slash deliminated files
  }
#Middle
    {
#   printf("%s\n", $1)
   num = split($NF,Line,".")   # number of fields in the last / field
    if ( num  > 1  ) #only one dot
    { 
#input directory and file name
#output directory 
    for (i = 2; i < NF; i++) {printf("/%s", $i)}
    printf("/")
#output file name
    for (i = 1; i< (num-1) ; i++) { printf("%s_", Line[i])}
    for (i = (num-1) ; i< num ; i++) { printf("%s.", Line[i])}
    printf("%s /apps/paradigm/PG99/seisx_support/segy_v3.fmt\n", Line[num])}
}

END {  }