# original example, 58 chars

perl -e 'print join(" ", map { sprintf("%03u", $_) } (2..20)), "\n"'

##</code><code>##

# my golf score: 45 chars

perl -e 'print((map{sprintf("%03u ",$_)}(2..20)),"\n")'