Select Code to Download

my $records_data = $ref->{'records'}->[0]->{'record'}->...

# or shorter
my $records_data = $ref->{'records'}[0]{'record'}...

$pseudohash = [ { key => 5 } ];

$pseudohash->{key} = 42;

$VAR1 = [
          {
...
          undef,
          42
        ];

my $data = { 'records' => [
               {
...
               },
               ],
           };

my $records_data = $ref->{'records'}->{'record'}->{'recordData'}