s/^/DoFiBuMePaQ 1/
:
/.\{113\}/!{G;b}
/X/!s/ /X /
s/\(X\)\(.\w*\)/\2\1/ig
T
s/\bX/x/
T
s/x$//
T
:4
s/\(\(..\).*\)x/\1\2zz/
t4
s/\(.\)\(.\)\(\w*\)/\3\2\1/
T
s/.*aD //
T
Note that non-ascii characters in the above source code will be escaped (such as \x9f).