my $html = HTML::TagParser->new($line); my $body = $html->getElementById($id); $body = $body->subTree(); # $body is now a new HTML::TagParser object my @elem = $body->getElementsByClassName($class);