Using hex seems to be an abuse of the rules, but what the heck: gotta start golfing sometime. At 30 characters:
#23456789_123456789_123456789_ $_=hex a;print$_--,"\n"while$_
Update: juerd pointed out that I can't count. Fixed. (I was claiming 34 characters.)
blakem's hint brings me down to 28 characters
#23456789_123456789_12345678 $_=hex a;print$_--,$/while$_
setenv EXINIT 'set noai ts=2'

In reply to Re: TIMTOWTDI/golf - counting backwards by belden
in thread TIMTOWTDI/golf - counting backwards by Juerd

Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post; it's "PerlMonks-approved HTML":