4.4BSD/usr/src/old/awk/test/t.6

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