did you
google for "perl for pas"? You might have come across a
Link to O'Reilly. But it could well be that the statement is no longer true. Let's see what the other monks will tell you...
s$$([},&%#}/&/]+}%&{})*;#$&&s&&$^X.($'^"%]=\&(|?*{%
+.+=%;.#_}\&"^"-+%*).}%:##%}={~=~:.")&e&&s""`$''`"e