Select Code to Download

# warning windows doublequotes!
# Data::Dump is a bit better..
...
  "B",
  { 2 => "b" },
)

perl -MData::Dumper -e "@ar1='A'..'E';@ar2=1..5;@ar3='a'..'e';@hash{@a
+r1}=map{{$_=>shift @ar3}}@ar2;print Dumper \%hash"
...
                   '2' => 'b'
                 }
        };