in reply to Vote bot

Hey, if you don't need End, Char and Default handlers you don't have to declare empty ones, just write:

my $parser = new XML::Parser (Handlers =>{ Start =>\&hdl_start});