#!perl -p0 s#.*(\pL)((\W*\w\W*){0,9})\K\1#map/\w/g,$2#es&&redo
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page