perl - perl 中的文件句柄是全局的吗？

Question

#!/usr/local/bin/perl
sub trial
{
    open (LOGFILE, 'C:\Users\out.txt');
    trial();
}
trial();

请忽略它会进入无限循环。

文件句柄LOGFILE是本地的还是私有的？如果没有，我怎样才能将其设为私有/本地？我知道我的. 但我不知道如何在文件句柄上使用它。

Answer 1

这些文件句柄是全局的，因为它们是typeglobs。这有时会导致非常糟糕的意外，因为您可能会意外覆盖在您正在使用的某个模块中定义的此类文件句柄。

如果你想要词法文件句柄，my像这样定义它们：

open my $fh, '<', 'C:\Users\out.txt';

也可以看看：

• 哪个是好的做法，词法文件句柄或类型球？
• brian d foy 在Learning Perl中谈“为什么我们教裸字文件句柄”

Answer 2

词法文件句柄只是标准的my标量。请参阅perldoc 中open的示例以获取.

open (my $logfile, 'C:\Users\out.txt');

一般来说，三自变量形式open也是首选：

open (my $logfile, '<', 'C:\Users\out.txt');