BSD 4.3reno
{ x = $1 while (x > 1) { print x x = x / 10 } }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.