关于Perl中的BEGIN {Push ....}

Question

在某些perl程序中，我看到它们以

开头

BEGIN
{
push(@INC, '/home/usr1/Modules');
}

我想知道这部分打算做什么？

Answer 1

这可确保目录/home/usr1/Modules中包含的任何perl模块都可供使用。

当其中一个use ModuleName类型时，Perl会在@INC中的每个目录中搜索文件ModuleName.pm。