use XML::Simple;
my $config = XMLin("SAMLResponse with attrs.xml");
traverseHash($config);


sub traverseHash
{
    my $hRef=@_;
    print ref($hRef);
}