According to the documentation the following should work:

my $p = HTML::TokeParser->new(
\$html,
start => "'S',tagname,attr,attrseq,text,line,column",
end => "'E',tagname,text,line,column"
);

Unfortunately it doesn't on two counts.

Firstly, if more than one option is passed to new() it currently must be a completely balanced hash.

Secondly, providing formatting instructions which are already stored in %ARGS within HTML::TokeParser are overwritten by the default settings, rather than using the defaults and overriding with user settings.

This patch fixes both these issues.

Thanks,
Barbie.