Help for this page

Select Code to Download


  1. or download this
      DB<100> use List::MoreUtils "pairwise"

...

  DB<104> @vars
 => ("Xx", "Yy")
  2. or download this
      DB<105> @vars=qw(X Y)
 => ("X", "Y")

  DB<106> @vars = pairwise { $a . $b } @vars, @appends
 => ("Xx", "Yy")