#!perl -pl\x0d s/@{[s".."."gr]}\K$"//\x0d # see :http://www.perlmonks.org/?node_id=1052121
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page