Blame test/ofs1.awk

Packit 575503
# Translate this shell script into gawk:
Packit 575503
#
Packit 575503
#! /bin/sh -
Packit 575503
# 
Packit 575503
# awktest()
Packit 575503
# {
Packit 575503
#   echo a:b:c | $AWK -F":" '{$2="x"; OFS=FS; print}'
Packit 575503
#   echo a:b:c | $AWK -F":" '{$2="x"; print; OFS=FS; print}'
Packit 575503
#   echo a:b:c | $AWK -F":" '{$2="x"; print $1; OFS=FS; print}'
Packit 575503
#   echo a:b:c | $AWK -F":" '{$2="x"; print; $2=$2; OFS=FS; print}'
Packit 575503
# }
Packit 575503
# 
Packit 575503
# AWK=./gawk
Packit 575503
# awktest > foo.gawk
Packit 575503
Packit 575503
BEGIN { FS = ":" }
Packit 575503
Packit 575503
# Have to reset OFS at end since not running separate invocations
Packit 575503
Packit 575503
FNR == 1 { $2 = "x"; OFS = FS; print ; OFS = " "}
Packit 575503
FNR == 2 { $2 = "x"; print; OFS = FS; print ; OFS = " "}
Packit 575503
FNR == 3 { $2 = "x"; print $1; OFS = FS; print ; OFS = " "}
Packit 575503
FNR == 4 { $2 = "x"; print; $2 = $2; OFS = FS; print }