It looks like HTML::TokeParser can do this. Look at the EXAMPLES section. There is even a tutorial here at the monastery on using this CPAN module.