AutoSplit
СОДЕРЖАНИЕ
НАЗВАНИЕ
AutoSplit — разделение пакета для автоматической загрузки
СИНТАКСИС
autosplit($file, $dir, $keep, $check, $modtime);
autosplit_lib_modules(@modules); ОПИСАНИЕ
Эта функция разделит вашу программу на файлы, с которыми может работать модуль AutoLoader. Она используется как стандартными библиотеками Perl, так и утилитой MakeMaker для автоматической настройки библиотек для автоматической загрузки.
Интерфейс autosplit разбивает указанный файл в иерархию, укоренённую в директории $dir. Он создаёт директории по мере необходимости, отражая иерархию классов, и создаёт файл autosplit.ix. Этот файл выполняет функцию как объявления всех процедур пакета, так и отметки времени последнего обновления иерархии.
Остальные три аргумента к autosplit управляют другими параметрами авторазделителя.
- $keep
-
Если третий аргумент, $keep, имеет значение false, то все существующие
*.alфайлы в директории автоматической загрузки удаляются, если они больше не являются частью модуля (устаревшие функции). Значение по умолчанию для $keep равно 0. - $check
-
Четвёртый аргумент, $check, инструктирует
autosplitпроверить модуль, который в настоящее время разделяется, чтобы убедиться, что он включает спецификациюuseдля модуля AutoLoader, и пропустить модуль, если AutoLoader не обнаружен. Значение по умолчанию для $check равно 1. - $modtime
-
Наконец, аргумент $modtime указывает, что
autosplitдолжен проверить время изменения модуля по отношению к времени изменения файлаautosplit.ix, и разделить модуль только в том случае, если он новее. Значение по умолчанию для $modtime равно 1.
Типичное использование AutoSplit в утилите perl MakeMaker осуществляется через командную строку:
perl -e 'use AutoSplit; autosplit($ARGV[0], $ARGV[1], 0, 1, 1)' Определённый как макрос Make, он вызывается с аргументами файла и директории; autosplit разделит указанный файл в указанной директории и удалит устаревшие .al файлы, предварительно проверив, использует ли модуль AutoLoader, и убедившись, что модуль не разделен в текущем виде (тест modtime).
Формат autosplit_lib_modules используется при создании perl. Он принимает на вход список файлов (модулей), которые предполагается разместить в директории lib относительно текущей директории. Каждый файл отправляется в авторазделитель по одному, чтобы разделить его в директории lib/auto.
В обоих случаях использования авторазделителя разделяются только подпрограммы, определённые после маркера Perl __END__. Некоторые процедуры могут быть размещены перед этим маркером, чтобы принудительно загрузить и обработать их немедленно.
Несколько пакетов
Начиная с версии 1.01 модуля AutoSplit, возможно иметь несколько пакетов в одном файле. Обе следующие ситуации поддерживаются:
package NAME;
__END__
sub AAA { ... }
package NAME::option1;
sub BBB { ... }
package NAME::option2;
sub BBB { ... }
package NAME;
__END__
sub AAA { ... }
sub NAME::option1::BBB { ... }
sub NAME::option2::BBB { ... } ДИАГНОСТИКА
AutoSplit проинформирует пользователя, если необходимо создать указанную в вызове верхнюю директорию. Желательно, чтобы скрипт или процесс установки, вызывающий AutoSplit, предварительно создали полный путь к директории. Это предупреждение может указывать на то, что модуль разделяется в неверном пути.
AutoSplit предупредит пользователя обо всех подпрограммах, чьё имя вызывает потенциальные конфликты имён файлов на машинах с сильно ограниченной длиной имени файла (8 символов или меньше). Поскольку имя подпрограммы используется в качестве имени файла, эти предупреждения могут помочь в портировании на такие системы.
Предупреждения выдаются и файл пропускается, если AutoSplit не может найти маркер __END__ или спецификацию типа "package Name;".
AutoSplit также выведет общую диагностику для невозможности создания директорий или файлов.
АВТОР
AutoSplit поддерживается командой perl5-porters. Пожалуйста, направляйте любые вопросы на соответствующий список рассылки. Всё, что применимо к выпуску CPAN, можно отправить его основному разработчику.
Автор и разработчик: Команда Perl5-Porters <perl5-porters@perl.org>
Разработчик выпуска CPAN: Steffen Mueller <smueller@cpan.org>
АВТОРСКИЕ ПРАВА И ЛИЦЕНЗИЯ
Этот пакет является частью ядра Perl с момента первого выпуска Perl5. Он был выпущен отдельно в CPAN, чтобы старые установки могли воспользоваться исправлениями ошибок.
Этот пакет имеет те же авторские права и лицензию, что и ядро Perl:
Copyright (C) 1993, 1994, 1995, 1996, 1997, 1998, 1999,
2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008
by Larry Wall and others
All rights reserved.
This program is free software; you can redistribute it and/or modify
it under the terms of either:
a) the GNU General Public License as published by the Free
Software Foundation; either version 1, or (at your option) any
later version, or
b) the "Artistic License" which comes with this Kit.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See either
the GNU General Public License or the Artistic License for more details.
You should have received a copy of the Artistic License with this
Kit, in the file named "Artistic". If not, I'll be glad to provide one.
You should also have received a copy of the GNU General Public License
along with this program in the file named "Copying". If not, write to the
Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
02111-1307, USA or visit their web page on the internet at
http://www.gnu.org/copyleft/gpl.html.
For those of you that choose to use the GNU General Public License,
my interpretation of the GNU General Public License is that no Perl
script falls under the terms of the GPL unless you explicitly put
said script under the terms of the GPL yourself. Furthermore, any
object code linked with perl does not automatically fall under the
terms of the GPL, provided such object code only adds definitions
of subroutines and variables, and does not otherwise impair the
resulting interpreter from executing any standard Perl script. I
consider linking in C subroutines in this manner to be the moral
equivalent of defining subroutines in the Perl language itself. You
may sell such an object file as proprietary provided that you provide
or offer to provide the Perl source, as specified by the GNU General
Public License. (This is merely an alternate way of specifying input
to the program.) You may also sell a binary produced by the dumping of
a running Perl script that belongs to you, provided that you provide or
offer to provide the Perl source as specified by the GPL. (The
fact that a Perl interpreter and your code are in the same binary file
is, in this case, a form of mere aggregation.) This is my interpretation
of the GPL. If you still have concerns or difficulties understanding
my intent, feel free to contact me. Of course, the Artistic License
spells all this out for your protection, so you may prefer to use that.
© 1993–2020 Larry Wall and others
Licensed under the GNU General Public License version 1 or later, or the Artistic License.
The Perl logo is a trademark of the Perl Foundation.
https://perldoc.perl.org/5.28.3/AutoSplit