Your question has already been answered well, so as an aside, I want to make you aware of HTML::TokeParser::Simple. It can make TokeParser code much less crufty to read; have a look at the examples in the docs.

Makeshifts last the longest.