I tried html::Parser and HTML::TokeParser, but some error in reading file occurs.

So, what's the error? Where is the code that uses HTML::Parser/HTML::TokeParser? It's hard to tell you what's wrong with code that we can't see.

Have you tried to customize the code I gave you here? If yes, what problems did you face? If not, why not?