Select Code to Download

&pairwise(
  sub { $a => $b },
  \@a,
  ['a'..'d'],
);

sub ref_pairwise (&;@) { goto \&List::Util::pairwise }

ref_pairwise { $a + $b } \@a, ['a'..'d'];

use v5.12;
use List::MoreUtils;
...
    say "\t\t$a, $b";
    $i++;
} @arr, @bar;