Select Code to Download

#!/usr/bin/perl
package MyParser;
...
my $parser = MyParser->new;
$parser->parse("$html");
print "$main_content\n";

         Here's the body 1
         para1
         para2

    <bold_text> Here's the body 1 </bold_text>
    <p> para1 </p>
    <p> para2 </p>