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


in reply to on matching content of two text files

Why not use diff?

Or one of the Diff modules on CPAN?


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