Select Code to Download

$ perl -E 'use strict; my @x = qw{a b c}; my $y = @x; say $y->[1]'
Can't use string ("3") as an ARRAY ref while "strict refs" in use at -
+e line 1.

$ perl -E 'use strict; my @x = qw{a b c}; my $y = \@x; say $y->[1]'
b