xref: /freebsd/contrib/one-true-awk/bugs-fixed/getline-corruption.awk (revision 8aac90f18aef7c9eea906c3ff9a001ca7b94f375)
1BEGIN {
2	getline l
3	getline l
4	print (s=substr(l,1,10)) " len=" length(s)
5}
6