github.com/benhoyt/goawk@v1.8.1/testdata/gawk/ofs1.awk (about)

     1  # Translate this shell script into gawk:
     2  #
     3  #! /bin/sh -
     4  # 
     5  # awktest()
     6  # {
     7  #   echo a:b:c | $AWK -F":" '{$2="x"; OFS=FS; print}'
     8  #   echo a:b:c | $AWK -F":" '{$2="x"; print; OFS=FS; print}'
     9  #   echo a:b:c | $AWK -F":" '{$2="x"; print $1; OFS=FS; print}'
    10  #   echo a:b:c | $AWK -F":" '{$2="x"; print; $2=$2; OFS=FS; print}'
    11  # }
    12  # 
    13  # AWK=./gawk
    14  # awktest > foo.gawk
    15  
    16  BEGIN { FS = ":" }
    17  
    18  # Have to reset OFS at end since not running separate invocations
    19  
    20  FNR == 1 { $2 = "x"; OFS = FS; print ; OFS = " "}
    21  FNR == 2 { $2 = "x"; print; OFS = FS; print ; OFS = " "}
    22  FNR == 3 { $2 = "x"; print $1; OFS = FS; print ; OFS = " "}
    23  FNR == 4 { $2 = "x"; print; $2 = $2; OFS = FS; print }