4.7. Array assignment

Example 4-6. examples/arrays/array_assignment.p6

#!/usr/bin/perl6

my $owner = "Moose";
my @tenants = "Foo", "Bar";
my @people = ($owner, 'Baz', @tenants);  # the array is flattened:
say "{@people}";                         # Moose Baz Foo Bar


my ($x, @y)     = (1, 2, 3, 4); 
say $x;                              # $x = 1
say "{@y}";                          # @y = (2, 3, 4)