s/$/-\n!!=====/ s/=/====/g h : s/-\(.*\n\(!*\)=\)/\2\1/ t s/^\B/0/ s/0!\{10\}/!0/ t :3 s/\(0!*\)!/\1-/ t3 s/=// t s/0/ 0123456789/g s/ \w*\(\w\)\S\{9\}/\1/g s/.*/&----- &/m :7 s/-/ / s/\w // t7 P g s/=/!/ h t d
Note that non-ascii characters in the above source code will be escaped (such as \x9f).