Select Code to Download

2;0 juerd@ouranos:~$ perl -we'@_[0]'
Scalar value @_[0] better written as $_[0] at -e line 1.

my @foo = qw(a b c d e f g h i j);
my @bar = @foo[1, 5, 6, 4];         # @bar is now qw(b f g e)
my $bar = $foo[0];