xref: /freebsd/contrib/one-true-awk/testdir/t.3.x (revision b3e7694832e81d7a904a10f525f8797b753bf0d3)

{
x = $1
while (x > 1) {
	print x
	x = x / 10
}
}