Help for this page
my $parse_it = HTML::TokeParser->new( \ ${$self->{'HTML'} } );
my $parse_it = HTML::TokeParser->new( \ "$self->{HTML}" );