# the output from Dumper, s/\$VAR1/\$xml_ref/
$xml_ref ={
          'QuestionList' => [
                              {
                                'Question' => {
                                                'Text' => 'Are dingos your friend?',
                                                'Id' => '3',
                                                'Answer' => 'Satisfactory'
                                              }
                              },
                              {
                                'Question' => {
                                                'Text' => 'Should this run out of memory?',
                                                'Id' => '11',
                                                'Answer' => 'No'
                                              }
                              }
                            ]
        };

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

##</code><code>##

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