Select Code to Download

use strict;
use warnings;
...
my @c = map {{%{$a_[$_]}, %{$b_[$_]}}} 0..$#a_;

Dump (\@c);

$ARRAY1 = [
            {
...
              otherdata => 'bstuff'
            }
          ];