title: What does this HTML::Parser() code do in Perl?
body: <p>I came across a Perl code using HTML Parser like below</p>
  
  <pre><code>my $p = HTML::Parser-&gt;new(text_h =&gt; [ sub {$text .= shift}, 
                                    'dtext']);
  </code></pre>
  
  <p>Please help me to understand this.</p>