Perl多维数组

本文概述

• Perl多维数组矩阵示例
• Perl多维数组初始化和声明示例

Perl多维数组是具有多个一维的数组。多维数组以行和列的形式表示, 也称为矩阵。

它们不能容纳数组或哈希, 只能容纳标量值。它们可以包含对另一个数组或哈希的引用。

Perl多维数组矩阵示例

在这里, 我们通过组合三个不同的数组arr1, arr2和arr3来打印3维矩阵。将这三个数组合并以使矩阵数组成为最终数组。

两个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 "Print Using 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";
}

输出

Print Using Array Index
0 10 0
0 0 20 
30 0 0

Perl多维数组初始化和声明示例

在此示例中, 我们将初始化并声明三维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";
}

输出

1 2 3
4 5 6 
7 8 9