Perl 会直接将文件内容读入内存是对的吗？

Question

这可能很明显，但我想咨询一下。

所以我有以下 perl 模块：

use strict;
use warnings;
use File::Slurp;


my @list = read_file_subroutine();

my %hash = map {$_ => 1} @list;

sub does_list_contain_smth() {
    my ($self, $data) = @_;
    if ($hash($data)) {
       return 1;
    }
    return 0;
}

sub get_list() {
    return \@list;
}

sub read_file_subroutine {
    my $file = "/some/file/path/file.txt";
    my $content = read_file($file);
    my @list = split "\n", $content;
    return \@list

1;

read_file_subroutine只会被调用一次并且文件内容将被放入内存中，我对吗？

Answer 1

是的。

read_file_subroutine只会被调用一次。 只有一个调用，它不在任何类型的循环中，也不是一个被多次调用的子程序。

read_file确实将整个文件读入内存。 其文档的第一句话：

此函数读入整个文件并将其内容返回给调用者