Select Code to Download

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

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

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

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

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;

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