while($parser->get_tag){
   my $stripped_html = $parser->get_trimmed_text(),"\n";
	#print $parser->get_trimmed_text(),"\n";
   print $stripped_html;
	}