在Perl中打印二维数组中的行信息,可以通过嵌套的foreach
循环来实现。以下是一个示例代码:
#!/usr/bin/perl
use strict;
use warnings;
# 定义一个二维数组
my @matrix = (
[1, 2, 3],
[4, 5, 6],
[7, 8, 9]
);
# 打印二维数组中的行信息
foreach my $row (@matrix) {
foreach my $element (@$row) {
print "$element ";
}
print "\n";
}
foreach
循环遍历每一行。foreach
循环遍历每一行的元素。@$row
表示将行引用解引用为数组,以便遍历其中的元素。1 2 3
4 5 6
7 8 9
通过这种方式,你可以轻松地打印出二维数组中的每一行信息。
领取专属 10元无门槛券
手把手带您无忧上云