User a proper XML parser for working with XML files, such as XML::Twig "XML::Twig - A perl module for processing huge XML documents in tree mode.".