Select Code to Download

my $AoH = [ { page => 'main',
              chap => 'About'},
...
@$AoH = map { { page => $_ , chap=>$_ } } keys %uniq;

print Dumper ($AoH);

$VAR1 = [
          {
...
            'page' => 'main'
          }
        ];

$VAR1 = [
          {
...
            'chap' => 'Contact'
          }
        ];

   'page' => 'main',
   'chap' => 'About'