Perl 多维数组
Perl 多维数组
Perl 多维数组是多维数组。多维数组以行和列的形式表示,也称为矩阵。
它们不能保存数组或哈希值,只能保存标量值。它们可以包含对另一个数组或哈希的引用。
Perl 多维数组矩阵示例
在这里,我们通过组合三个不同的数组arr1、arr2 来打印一个 3 维矩阵 和 arr3。将这三个数组合并成一个矩阵数组 final。
两个 for 循环与两个控制变量 $i 和 $j 一起使用。
## Declaring arrays
my @arr1 = qw(0 10 0);
my @arr2 = qw(0 0 20);
my@arr3 = qw(30 0 0);
## Merging all the single dimensional arrays
my @final = (\@arr1, \@arr2, \@arr3);
print"PrintUsing Array Index\n";
for(my $i = 0; $i <= $#final; $i++){
# $#final gives highest index from the array
for(my $j = 0; $j <= $#final ; $j++){
print"$final[$i][$j] ";
}
print"\n";
}
输出:
PrintUsing Array Index
0 10 0
0 0 20
30 0 0
Perl 多维数组初始化和声明示例
在这个示例中,我们初始化和声明了一个 3 维 Perl 数组。
@array = (
[1, 2, 3],
[4, 5, 6],
[7, 8, 9]
);
for($i = 0; $i < 3; $i++) {
for($j = 0; $j < 3; $j++) {
print"$array[$i][$j] ";
}
print"\n";
}
输出: