Not as clever as jmcnamara or belg4mit or as short as chipmunk. Oh well.

perl -le'$^=~s#.#$_=$'\'';print s/.|$//g#ge'
[download]

or 5.6:

perl -le'$^=~s/.$/!print@+/e while$^'
[download]

update: but this works with 5.005:

perl -le'$_=$^;s||s/.$/!print length/e|ge'
[download]

  p