Select Code to Download

# the output from Dumper, s/\$VAR1/\$xml_ref/
$xml_ref ={
...
        };

print $xml_ref->{'QuestionList'}->{'Question'}->[0]->{'Answer'};

print $xml_ref->{'QuestionList'}->[0]->{'Question'}->{'Answer'};