数据结构说明

Question

我曾阅读过以下涉及迭代的Perl代码。

for my $j (0 .. $#{$dat[$Row]})
{
    $vectors{ $dat[$Row][$j] } = $j;
}

什么是

$vectors{ $dat[$Row][$j] } 

代表什么？ 这相当于$vectors->$dat[$Row][$j]？

Answer 1

what does $vectors{ $dat[$Row][$j] } stand for?

$dat[$Row]是对数组的引用。 $dat[$Row][$j]显然是该数组中的一个元素。无论包含哪个值，都会成为%vectors中的哈希键，其值为$j。

Is that equivalent $vectors->$dat[$Row][$j]

不，那是指变量$vectors，而不是%vectors。

更可读的方式可能是：

my $aref = $dat[$Row];   
for my $index (keys @$aref) {
    my $key = $aref->[$index];
    $vectors{$key} = $index;
}

其中也举例说明了使用->取消引用引用。

Answer 2

$vectors是一个散列，$dat是一个多维数组（引用数组），$Row和$j是两个标量。因此，您要将$dat[$Row][$j]哈希中%vectors给出的密钥设置为$j。

Answer 3

%vectors是一个哈希值 $vectors{$k}是密钥$k的哈希值 $dat[$Row][$j]是二维数组的元素（列$j，行$Row）

因此循环正在创建一个散列，其中键是内容，值是列索引。

Answer 4

$vectors{ $dat[$Row][$j] } 

是

的缩写

$vectors{ $dat[$Row]->[$j] } 

如果拼写出来，

# $Row is a row index.
# $j is a column index.
# (How inconsistent!)

my $row = $dat[$Row];   # A ref to an array.
my $key = $row->[$j];   # A value from the table.
$vectors{$key}