http://www.perlmonks.org?node_id=834120


in reply to Re^2: __DATA__ on commandline does not work?
in thread __DATA__ on commandline does not work?

...which s almost exactly my second codefragment in the question.


s$$([},&%#}/&/]+}%&{})*;#$&&s&&$^X.($'^"%]=\&(|?*{%
+.+=%;.#_}\&"^"-+%*).}%:##%}={~=~:.")&e&&s""`$''`"e