print HTML::TreeBuilder->new_from_content( $string )->as_text;