Perl search file recursive for string and replace
<p>in terminal with perl how can I search all php files starting recursive from current working directory for a single or multiline pattern like:</p>

<pre><code>&lt;script&gt;var a=''; * hamoorabi.com * &lt;/script&gt;
</code></pre>

<p><em>Read like:</em> find all between <code>&lt;script&gt;var a='';</code> and <code>&lt;/script&gt;</code> but only if contains <code>hamoorabi.com</code> and replace it with an empty string (remove it).</p>

<p>As it´s javascript code there can be a bunch of unescaped characters inside the search string.</p>