But you don't need the $t! 27 chars:

seq{shift=~join".*",split//,pop}
[download]

Or 25 using /./g:

seq{shift=~join".*",pop=~/./g}
[download]

Or 33 with pathological protection:

seq{shift=~join"\E.*\Q","",pop=~/./gs}
[download]

  p