If your data is proper XML always use one of the many XML parsing modules, it's lots easier than trying to get your code to handle all of the special cases. Try XML::Simple for a start.