And even if it isn't XML, you could jam it into XML in order to take advantage of existing XML parsing facilities. To wit:

use XML::Simple;

while (<>)
{
    chomp;
    my $hashref = XMLin("<$_/>");
    ...
}
[download]