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

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