I would like to emphasize two ways:
1. Not recommended: If you are absolutely sure about xml format (considering new lines e.t.c.), you can read the file line by line and just apply regexps on it.
2. Recommended: Hook the events of some XML::Parser.