Select Code to Download

$arr[0] = [1,2,3];
$arr[1] = [4,5,6];
$index=1;

print "$arr[$index][2]";

my @array = (1,2,3);
my $array[0] = 4;

perldoc perlref