Тестирование уже установленных модулей perl

Этот пост также доступен в моём ЖЖ

Это запись чтобы лучше запомнить. Установил я сервер, и возникло подозрение, что некоторые перловые модули глючат. На одном из подозрительных модулей я сделал «test IO::Util» и получил ошибку тестирования. Мне это сразу не понравилось, но ещё больше меня не радует возможность того, что это не единственный модуль, который работает плохо. Документацию я читать не умею, поэтому сделал всё полуавтоматически.

Небольшой скриптик создал мне список команд для выполнения теста:

#!/usr/bin/perl

use ExtUtils::Installed;
$installed = ExtUtils::Installed->new();
foreach $module ($installed->modules()){
printf "echo \"====================== Тестирование модуля %s ========================\"\n", $module;
printf "echo \"test %s\" \| perl -MCPAN -e shell | grep \"^Result:\"\n", $module;
}

На выходе из этого скрипта получил примерно такой файл:

echo "====================== Тестирование модуля Algorithm::C3 ========================"
echo "test Algorithm::C3" | perl -MCPAN -e shell | grep "^Result:"
echo "====================== Тестирование модуля Apache::LogFormat::Compiler ========================"
echo "test Apache::LogFormat::Compiler" | perl -MCPAN -e shell | grep "^Result:"
echo "====================== Тестирование модуля Apache::Test ========================"
echo "test Apache::Test" | perl -MCPAN -e shell | grep "^Result:"
echo "====================== Тестирование модуля AppConfig ========================"
echo "test AppConfig" | perl -MCPAN -e shell | grep "^Result:"

Выполнение этого файла показало мне модули, которые не тестируются:

====================== Тестирование модуля Class::Unload ========================
Result: PASS
====================== Тестирование модуля Class::XSAccessor ========================
Result: PASS
====================== Тестирование модуля Class::props ========================
Result: FAIL
====================== Тестирование модуля Clone ========================
Result: PASS
====================== Тестирование модуля Compress::Raw::Bzip2 ========================
Result: PASS
====================== Тестирование модуля Compress::Raw::Zlib ========================
Result: PASS

Вот их то я завтра с утра и буду руками проверять на предмет ошибок тестирования и наводить порядок.

Спасибо за внимание.

PS: Команда grep -B 1 FAIL <имя-файла-с-результатами> показывает нетестируемые модули.

Добавить комментарий

Этот сайт использует Akismet для борьбы со спамом. Узнайте как обрабатываются ваши данные комментариев.