xref: /illumos-gate/usr/src/test/util-tests/tests/awk/gnu/setrec1.awk (revision ed093b41a93e8563e6e1e5dae0768dda2a7bcc27)

function reassign(x, y) {
   $0 = x
   print y
}

BEGIN {
   $0 = substr("geronimo", 5, 3)
   reassign(" 52", $1)
}