首页 > 解决方案 > perl 中 [ 和 ( 的以下两个代码之间的区别?

问题描述

当我想将输入文件分配给数组时,出现此错误。

while (<>) {
my @tmp = split;
push my @arr,[@tmp];
print "@arr\n";
}

output: ARRAY(0x7f0b00)
        ARRAY(0x7fb2f0)

如果我更改[为,(那么我将获得所需的输出。

while (<>) {
my @tmp = split;
push my @arr,(@tmp);
print "@arr\n";

output: hello, testing the perl
        check the arrays.

(@tmp)和之间的区别是什么[@tmp]

标签: arraysperlmultidimensional-arrayreference

解决方案


普通括号()除了改变优先级之外没有特殊的功能。它们通常用于限制列表,例如my @arr = (1,2,3)方括号返回数组引用。在您的情况下,您将构建一个二维数组。(如果您的代码没有损坏,您会这样做)。

你的代码也许应该这样写。请注意,您需要在循环块之外声明数组,否则它将不会保留先前迭代的值。另请注意,您不需要使用@tmp数组,只需splitpush.

my @arr;                    # declare @arr outside the loop block
while (<>) {
    push @arr, [ split ];   # stores array reference in @arr
}
for my $aref (@arr) {
    print "@$aref";         # print your values
}

该数组将具有以下结构:

$arr[0] = [ "hello,", "testing", "the", "perl" ];
$arr[1] = [ "check", "the", "arrays." ];

例如,如果您想防止输入行混淆,这是一个好主意。否则,所有值最终都位于数组的同一级别。


推荐阅读