@a = qw/foo bar/; 
print @a->[1];

##</code><code>##

print $a[1];

##</code><code>##

print @a[1];