Относительно BEGIN {Push ....} в Perl

Question

В некоторых программах на Perl, я вижу, они начинаются с

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

Я хотел бы знать, что собирается делать эта часть?

Answer 1

Это гарантирует, что любые модули perl, содержащиеся в каталоге /home/usr1/Modules, будут доступны для использования.

Когда вы наберете use ModuleName, Perl будет искать в каждом каталоге в @INC файл ModuleName.pm.