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

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

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