push @stripped_html, $parser->get_trimmed_text()."\n" while($parser->get_tag);
print join "", @stripped_html;