one-true-awk/testdir/t.6

*23f24377SWarner Losh/a|b|c/	{
*23f24377SWarner Losh	i = $1
*23f24377SWarner Losh	print
*23f24377SWarner Losh	while (i >= 1) {
*23f24377SWarner Losh		print "	", i
*23f24377SWarner Losh		i = i / 10
*23f24377SWarner Losh	}
*23f24377SWarner Losh}