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

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