xref: /freebsd-src/contrib/one-true-awk/bugs-fixed/getline-corruption.awk (revision f32a6403d34654ac6e61182d09abb5e85850e1ee)

BEGIN {
	getline l
	getline l
	print (s=substr(l,1,10)) " len=" length(s)
}