I have been 'asked' not to download the XML module on my workstation, so I am trying to be creative.

See Parsing HTML/XML with Regular Expressions and Yes, even you can use CPAN, and for the sake of your own sanity, you really, really should use something like XML::LibXML.