Size: a a a

2020 September 02

AP

Anton Petrusevich in Modern::Perl
скорее eval "use Module"
источник

SZ

Sergey Zhmylove in Modern::Perl
Andrei Protasovitski
Как-то точно можно.
Что тебе нужно?
источник

SZ

Sergey Zhmylove in Modern::Perl
Понял
источник

SZ

Sergey Zhmylove in Modern::Perl
Andrei Protasovitski
В общем, отложенная компиляция.
Сунь в sub CHECK {} или даже скорее INIT
источник

SZ

Sergey Zhmylove in Modern::Perl
источник

SZ

Sergey Zhmylove in Modern::Perl
Типа вот
источник

SZ

Sergey Zhmylove in Modern::Perl
Sergey Zhmylove
Сунь в sub CHECK {} или даже скорее INIT
Впрочем, check тоже работает
источник

SZ

Sergey Zhmylove in Modern::Perl
Там порядок разный будет, если тебе это понадобится
источник

AP

Andrei Protasovitski in Modern::Perl
Наверное, мой пример не очень корректный. Там был модуль для кронждобов. Он засекал время выполнения, экспортировал всякие команды для лога. Помимо прочего, в скрипте можно было определить функцию args, которая возвращала список аргументов командной строки, их типы и описания. Потом эти аргументы можно было вытащить по param('name'), а из описаний выскакивала подсказка Usage:.
источник

AP

Andrei Protasovitski in Modern::Perl
Да, INIT тоже хорошо. Совсем про них забыл... :)
источник

AP

Andrei Protasovitski in Modern::Perl
В общем, спасибо! :)
источник

W

Warstone in Modern::Perl
Andrei Protasovitski
Наверное, мой пример не очень корректный. Там был модуль для кронждобов. Он засекал время выполнения, экспортировал всякие команды для лога. Помимо прочего, в скрипте можно было определить функцию args, которая возвращала список аргументов командной строки, их типы и описания. Потом эти аргументы можно было вытащить по param('name'), а из описаний выскакивала подсказка Usage:.
Так все что ты рассказал не требует INIT или CHECK
источник

W

Warstone in Modern::Perl
Все что надо - это перепилить import
источник

W

Warstone in Modern::Perl
Ну и END в конце
источник

ВР

Василий Степанович Р... in Modern::Perl
Во дискуссию развели.
А делов-то...
Любая процедура модуля может быть вызвана приставкой названия модуля к назвпнию процедуры:
название_модуля::название_процедуры_из_него
Дерзайте!
источник

ВР

Василий Степанович Р... in Modern::Perl
А что это, кстати, за INIT да CHECK, да ещё и END, которые тут по дороге (пока я спал), успели спозаранку обсудить? Я знаю только про BEGIN. 🤔
источник

AE

Alexandr Evstigneev in Modern::Perl
Василий Степанович Родин
А что это, кстати, за INIT да CHECK, да ещё и END, которые тут по дороге (пока я спал), успели спозаранку обсудить? Я знаю только про BEGIN. 🤔
источник

AP

Andrei Protasovitski in Modern::Perl
Warstone
Ну и END в конце
Из документации (ну и проверил я сам):
An END code block is executed as late as possible, that is, after perl has finished running the program and just before the interpreter is being exited, even if it is exiting as a result of a die() function. 

То есть, оно не вызовется, пока процесс не умрёт. INIT — самато! :)
источник

AP

Andrei Protasovitski in Modern::Perl
Василий Степанович Родин
А что это, кстати, за INIT да CHECK, да ещё и END, которые тут по дороге (пока я спал), успели спозаранку обсудить? Я знаю только про BEGIN. 🤔
Они очень редко применяются. Я никогда раньше ни INIT, ни CHECK не использовал, хотя и знал про них.
источник

SZ

Sergey Zhmylove in Modern::Perl
Василий Степанович Родин
Во дискуссию развели.
А делов-то...
Любая процедура модуля может быть вызвана приставкой названия модуля к назвпнию процедуры:
название_модуля::название_процедуры_из_него
Дерзайте!
LOL, посмотри код по моей ссылке и попробуй повторить
источник