my ($record) = $data[$n];  # Index starts at 0, not 1

      # AoH
      print "$record->{a} | $record->{b} | $record->{c}\n";

      # AoA
      print "$record->[0] | $record->[1] | $record->[2]\n";