$VAR1 = {
  '12349' => [
               {
                 'name' => 'RIC',
                 'reference' => '00y77676',

               }
             ],
  'X334' => [
               {
 
                 'name' => 'MES',
                 'reference' => '0089kkjh9',

               }
             ],
};
my $href = $VAR1->{12349}[0];
print $href, "\n";

##</code><code>##

print "$_ => $VAR1->{12349}[0]{$_}\n" for keys %{$VAR1->{12349}[0]};