$/ = '</h1>';

##</code><code>##

     $chunk =~ m%<h1>(.+)</h1>%i;