my $xml = XMLin($data);

##</code><code>##

my $genes = XMLin($data, 
  keyattr    => { gene => 'id' },
  forcearray => [ 'gene' ],
);

##</code><code>##

XMLin(\*DATA, ...);