use XML::Simple;

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