perl - 为什么我不能说 print $somehash{$var}{fh} "foo"？

Question

我有一行代码:

print $somehash{$var}{fh} "foo";

哈希包含向下几级的文件句柄。错误是:

String found where operator expected at test.pl line 10, near "} "foo""

我可以通过这样做来解决它:

my $fh = $somehash{$var}{fh};
print $fh "foo";

...但是有单行吗？

Answer 1

见 http://perldoc.perl.org/functions/print.html

Note that if you're storing FILEHANDLEs in an array, or if you're using any other expression more complex than a scalar variable to retrieve it, you will have to use a block returning the filehandle value instead: ...

因此，在您的情况下，您将使用这样的 block :

print { $somehash{$var}{fh} } "foo";