$whole_thing =~
      m|<some unique html start string>(.*?)<end string>|s;
    $good_chunk = $1;
##</code><code>##

($good_chunk) = $whole_thing =~
      m|<some unique html start string>(.*?)<end string>|s;