gpt4 book ai didi

perl - 从子例程中的文件句柄引用中读取

转载 作者:行者123 更新时间:2023-12-01 12:11:27 25 4
gpt4 key购买 nike

我想将对文件句柄的引用传递给子例程,这样子程序中的代码可以从文件中读取并且文件句柄中的位置在调用环境中发生变化,就像在 C 中使用指针一样.

这种东西:

open my $fh, '<', $somefile or die;

dosomething(\$fh);

sub dosomething
{
my $fh_ref = shift;

while (my $l = <$$fh_ref>)
{
print $l;
print "\n";
}
}

这给出了这个输出而不是写每一行:

 GLOB(0x20b8b38)

很明显我取消引用文件句柄引用错误。

附录:

while (my $l = readline($$fh_ref))
{

等等

似乎可以解决问题。我仍然想知道为什么第一种方法不起作用。

25 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com