Select Code to Download

   Functions <code>abc()</code> and <code>foo()</code>

   m#<code>((?:(?!foo).)*)</code>#

#!/usr/bin/perl -w

...
Doubled matches like <code></code> foo <code></code> are evil.
This should <code> skip the second loop</code><code> foo </code>.
This <code> foo </code> should  <code> skip the first loop </code>.