Working off my TMTOWTDI Puzzle: Generating a range of numbers entry:

s|^$|$^|s;
s|.|..|g;
s|.|s///g|ge;
s|..|$&.reverse.$/|e;
print
[download]

But it still has a word in it (other than the final print) :(.

  p