Select Code to Download

<div class="post reply body-not-empty" id="reply_8735435">
(cut out for visibility)
<p class="body-line ltr ">The first 3 lines were 15% bait power, but t
+hen it fell to mere 5% and the last lines are literally 0%, try again
+ in a few days.</p>
...
<p class="body-line ltr quote">&gt;Reddit is a great place for discour
+se and there are many active subreddits where field professionals reg
+ularly answer questions on issues of health, science, engineering, et
+c</p>
<p class="body-line ltr ">Yeah, as far as content goes, Reddit kicks 8
+chan's ass. They have some great boards for serious academic discussi
+on.</p>
<p class="body-line empty ">

my $parser = HTML::TokeParser::Simple->new(\$data);

...
    #~ # print $id ." ";
    }
}