my @names = ('Jack', 'Emma', 'Robert');
my @ages = (20, 19, 35);

##</code><code>##

pugs> for zip(@names; @ages) -> [ $name, $age ] {say "  $name is $age years old"}
Internal error while running expression:
***
    Unexpected "["
    expecting subroutine parameters, trait or block
    at <interactive> line 1, column 27

##</code><code>##

pugs> for zip(@names; @ages) ->  $name, $age  {say "  $name is $age old"}
  Jack 20 is Emma 19 old
  Robert 35 is  old
undef

##</code><code>##

pugs> for zip(@names; @ages) ->  $name, $age  {say  "   $name.[0] is $name[1] old; while  $age.[0] may be $age
[1]"}
   Jack is 20 old; while  Emma may be 19
   Robert is 35 old; while   may be
undef

##</code><code>##

pugs> for zip(@names; @ages) -> @_  {say  "   @_[0] is @_[1] years old;"}
   Jack is 20 years old;
   Emma is 19 years old;
   Robert is 35 years old;

##</code><code>##

pugs> for zip(@names; @ages) -> ($n,$a)  {say  "   $n is $a old; "}
   Jack 20 is Emma 19 old;
   Robert 35 is  old;
undef
pugs> for @names Z @ages -> ($n,$a)  {say  "   $n is $a old; "}
   Jack 20 is Emma 19 old;
   Robert 35 is  old;
undef
pugs> for @names Z @ages -> ($n;$a)  {say  "   $n is $a old; "}
   Jack 20 is Emma 19 old;
   Robert 35 is  old;
undef
pugs> for @names Z @ages -> $n,$a  {say  "   $n is $a old; "}
   Jack 20 is Emma 19 old;
   Robert 35 is  old;
undef
pugs> for @names Z @ages -> $n;$a  {say  "   $n is $a old; "}
   Jack 20 is Emma 19 old;
   Robert 35 is  old;
undef