以特定间隔迭代perl

Question

对不起我的noobness， 这会迭代整个表。但是，我想从第2行开始迭代。怎么做。

foreach my $row ($table->rows) {
    print join(',', @$row), "\n";
}

感谢。

Answer 1

my @rows = $table->rows;
for my $row (@rows[ 1 .. $#rows ]) {
    print join(',', @$row), "\n";
}