“ read_file”命令不适用于大文件

Question

我正在使用read_file命令在Perl中读取文件并将其传递给变量$text

my $text = read_file('filename')

我面临的问题是文件很大。对于较小的文件，$text变量将获取值，但是当文件很大时，$text不会从文件中获取任何行。

我正在使用 File::Slurp 模块。

Answer 1

我会尝试采用老式的方式。

my $text;
{
    use autodie;
    local $/;

    open my $fh, '<', 'filename';
    $text = <$fh>;
    close $fh;
}