Perl的Slurp模块如何工作？

Question

我看了一下Slurp的来源,我很想知道它是如何slurp()工作的:

sub slurp { 
    local( $/, @ARGV ) = ( wantarray ? $/ : undef, @_ ); 
    return <ARGV>;
}

文件在哪里打开？

Answer 1

见ARGV和$/中的perldoc perlvar.

另请参见Path :: Class:File :: slurp.

Answer 2

ARGV 是一个句柄,文件已被隐式打开.