deprecate

СОДЕРЖАНИЕ

• ИМЯ
• СИНОПСИС
• ОПИСАНИЕ
  • Важное замечание
• ЭКСПОРТ
• СМОТРИТЕ ТАКЖЕ
• АВТОР
• АВТОРСКИЕ ПРАВА И ЛИЦЕНЗИЯ

ИМЯ

deprecate - Perl pragma для устаревания включения модуля в ядро

СИНОПСИС

use deprecate;  # warn about future absence if loaded from core

ОПИСАНИЕ

Этот pragma упрощает поддержку модулей двойной жизни, которые больше не будут включены в ядро Perl в будущей версии Perl, но всё ещё включены в текущей.

Цель pragma — предупредить пользователей о статусе такого модуля, выдав предупреждение, которое побуждает их установить модуль с CPAN, чтобы будущая обновление Perl, в котором модуль отсутствует, не сломало их код.

Это предупреждение будет выведено только в том случае, если модуль был загружен из каталога ядра, что позволяет включить use deprecate в версии модуля с CPAN. Поскольку pragma молчит, когда модуль выполняется из каталога не-ядра, вызов pragma не нужно вносить в ядро или версию модуля с CPAN. Точно такой же код можно отправить для любой цели.

Важное замечание

Обратите внимание, что когда модуль устанавливается с CPAN в каталог ядра вместо каталогов сайта, пользователь не получает никакой защиты от его установки.

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

Поэтому модули, которые могут устанавливаться с CPAN в каталог ядра, должны убедиться, что они не вызывают этот pragma, когда они это сделали. Как правило, это означает, что точная логика установщика должна быть скопирована внутри модуля. Например:

# Makefile.PL
WriteMakefile(
    # ...
    INSTALLDIRS => ( "$]" >= 5.011 ? 'site' : 'perl' ),
);

# lib/Foo/Bar.pm
use if "$]" >= 5.011, 'deprecate';

(Приведённый выше пример демонстрирует наиболее важный случай: когда целевая версия Perl старше 5.12 (где каталоги ядра имеют приоритет над каталогами сайта) и модуль, который устанавливается, был включён в ядро в этой версии Perl. В этих обстоятельствах обновление модуля с CPAN возможно только путём установки в каталог ядра.)

ЭКСПОРТ

По умолчанию ничего. Единственный метод — import, вызываемый use deprecate;.

СМОТРИТЕ ТАКЖЕ

Первый пример, в котором use deprecate; использовался, — Переключение.

АВТОР

Первоначальная версия Николасом Кларком

АВТОРСКИЕ ПРАВА И ЛИЦЕНЗИЯ

Авторские права (C) 2009, 2011

Эта библиотека является свободным программным обеспечением; вы можете распространять и/или изменять её на тех же условиях, что и Perl сам, либо Perl версии 5.10.0, или, по вашему выбору, любой более поздней версии Perl 5, которая у вас есть.