DB<110> use List::MoreUtils "pairwise"

  DB<111> ($x,$y)=("X","Y")
 => ("X", "Y")

  DB<112> pairwise { $$a .= $b } @{[\($x,$y)]}, @{["x","y"]}
 => ("Xx", "Yy")

  DB<113> $x,$y
 => ("Xx", "Yy")