Help for this page

Select Code to Download


  1. or download this
    use feature ":5.14";
use warnings FATAL => qw(all);
...
my %c = %{{map {($_, $b{$a{$_}})} keys %a}};

pp(\%c)
  2. or download this
    { key1 => "val5", key2 => "val6", key3 => "val7" }