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