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

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