Select Code to Download

my @x = \qw(a b c);
print "$_ $$_ \n" for @x;

my @x = [qw(a b c)]; #@x has one element
print "$_ @$_\n" for @x;

my $x = \qw(a b c);
print "$x $$x\n";