perl -pe'BEGIN{$i=$j=ord$/}$_=($i--||exit).chr$j' </dev/urandom [download]
In reply to Re: TIMTOWTDI/golf - counting backwards by Aristotle in thread TIMTOWTDI/golf - counting backwards by Juerd