这已经被问过几次了,但这些答案似乎都不适用于我的情况。
我的代码:
open(FILE, "<", $fileb) or die "File not openable: $!";
while (<FILE>) {
$filebmeta[$line] = (data => $_, match => -1);
$line++;
}
close(FILE);
$line = 0;
for my $hashref (@filebmeta) {
print "$hashref->{data}\n";
}
当我运行此代码时,它会吐出:'在 ./partc.pl 第 152 行使用 "strict refs" 时,不能使用字符串 ("-1") 作为 HASH ref。
知道为什么会这样吗?我似乎无法在循环中正确取消引用哈希。