my $html = HTML::TagParser->new($line); my $body = $html->getElementById($id); my @elem = $body->getElementsByClassName($class);