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";
        }