G'day perladdict,

Look at the XML::Parser::Expat documentation. Read the first few lines of the SYNOPSIS. See how your code differs from the published documentation.

Then keep reading to acquaint yourself with the details!