Select Code to Download

use Data::Dumper;
use Data::Dump::Streamer;
...

print Dumper \%MappingOfRecords;
Dump \%MappingOfRecords;

$VAR1 = {
          'c' => '3',
...
           c => 3,
           d => 4
         };