Select Code to Download

use strict;
use warnings;
...
for my $rowIndex (0 .. $#list) {
    print "row $rowIndex: @{$list[$rowIndex]}\n";
}

A row:
1
...
All rows by index:
row 0: 1 2 3
row 1: a b c