for my $index (0 .. 9) { print $data[1][$index]; }