one-true-awk/testdir/t.6

*9a7741deSElliott Hughes/a|b|c/	{
*9a7741deSElliott Hughes	i = $1
*9a7741deSElliott Hughes	print
*9a7741deSElliott Hughes	while (i >= 1) {
*9a7741deSElliott Hughes		print "	", i
*9a7741deSElliott Hughes		i = i / 10
*9a7741deSElliott Hughes	}
*9a7741deSElliott Hughes}