Как импортировать несколько пользовательских модулей в наш собственный скрипт Perl?

Question

Я сказал 100 пользовательских пакетов, таких как (file1.pm, file2.pm, file3.pm, file4.pm, file5.pm, file6.pm)

Каждый файл содержит одну функцию.

Я хочу импортировать все в каждом простом скрипте Perl.Как легко их импортировать.Пожалуйста, предложите какой-нибудь самый простой способ?

Answer 1

Вы можете использовать этот небольшой скрипт для загрузки в него всех 100 модулей:

# pragma
use strict;
use warnings;

# standard modules needed by the script
use Module::Load;

# the loop below loads all 100 of your custom modules (file1.pm, file2.pm, ...)
foreach my $i (1 .. 100)
{
    load "file$i";
}

Answer 2

Как я сказал в комментарии, я думаю, что это ужасный способ организовать вашу кодовую базу.Но если предположить, что вы ничего не можете с этим поделать, вы можете взглянуть на модуль Toolkit .