use warnings;
use strict;
use XML::Twig;

my $xml=<<'XML';
<Root>
<gfx>
   <group name="Group1" visible="true" wallpaper="false" isReferenceObject="false">
     <gotoButton name="GotoDisplayButton3" display="19 UNIT STATUS">
            <caption fontFamily="Arial" fontSize="9" caption="MAIN MENU" />
            <imageSettings imageName="" alignment="middleCenter"/>
        </gotoButton>
  </group>
  <gotoButton name="GotoDisplayButton12" display="36 AIR_OIL SYSTEM SETUP_2">
        <caption fontFamily="Arial" fontSize="9" caption="TO CRXW616&#xA;AIR/OIL" />
        <imageSettings imageName="" alignment="middleCenter"/>
  </gotoButton>
</gfx>
</Root>
XML

my $twig= new XML::Twig(
                          pretty_print => 'indented',
                          twig_handlers => {
                                             'gotoButton' => sub {print $_->att('name')," ",$_->att('display')," ", $_->first_child('caption')->att('caption'),"\n" }

                          },
);

$twig->parse( $xml);