use HTML::TagParser;

使い方は、perldoc HTML::TagParser 参照