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

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

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