Тестирование warn'ов

Тестирование warn'ов

На CPAN есть модуль для тестирования предупреждений:

    use Test::Warn;
    warning_is ( { code } "warn text" );
    warning_likes( { code } qr/text/ );

для нескольких предупреждений

    warnings_is ( { code } "warn text" );
    warnings_likes( { code } qr/text/ );

Убедиться, что сообщений не было:

warnings_are { is($module->method($var1, $var2), $result )} 
[];

Чтобы проверить, не было ли сообщений во время всех тестов, в начале .t-файла: use Test::NoWarnings;

Похожие записи

• Запуск web-сервера из командной строки
• Настройка Macbook'a для web-разработки на perl'e
• Полезный код на perl'e для работы с деревом файлов
• Авторизация OAuth 2.0 ВКонтакте на perl VKontakte::API::OAuth
• VKontakte::API v0.02