my $tree = HTML::TreeBuilder->new_from_content($webcrawler->content());
if (my $div = $tree->look_down(_tag => "article" )) {
print $div->as_text(), "\n";
} else {
print "Not found";
}
####
if (my $div = $tree->look_down(_tag => "p" , class=>"article entry-summary")) {
print $div->as_text(), "\n";
} else {
print "Not found";
}