$mech->get($url);
$content = $mech->response()->decoded_content(); 
my $tree = HTML::TreeBuilder::XPath->new;
$tree->parse($content);
$tree->eof;
@res = $tree->findvalues(???);#