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

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