#!/usr/bin/env perl
my
@show_versions
=
qw/
Dancer2
Log::Dispatch
Log::Log4perl
Mojolicious
Plack::Test
POSIX
PPI
String::Print
Sys::Syslog
Test::Pod
XML::LibXML
/
;
warn
"Perl $]\n"
;
foreach
my
$package
(
sort
@show_versions
)
{
eval
"require $package"
;
my
$report
= !$@ ?
"version "
. (
$package
->VERSION ||
'unknown'
)
: $@ =~ m/^Can't locate/ ?
"not installed"
:
"reports error"
;
warn
"$package $report\n"
;
}
use_ok(
'Log::Report'
);
use_ok(
'Log::Report::Die'
);
use_ok(
'Log::Report::Dispatcher'
);
use_ok(
'Log::Report::Dispatcher::File'
);
use_ok(
'Log::Report::Dispatcher::Try'
);
use_ok(
'Log::Report::Dispatcher::Perl'
);
use_ok(
'Log::Report::Dispatcher::Callback'
);
use_ok(
'Log::Report::Domain'
);
use_ok(
'Log::Report::Exception'
);
use_ok(
'Log::Report::Message'
);
use_ok(
'Log::Report::Translator'
);