I highly recommend using a XML::Parser for it

Its very easy to use and implement.

Initially for one of our tasks, without thinking about XML::Parser, I did wrote a mini XML::Parser which turned to be much complicated to maintain later.

Switch to parsers that are already available