| Subject: | Test::Expect and MSWin32 |
Test::Expect is incompatible with native Win32 environment, so
corresponding tests should be dropped when $^O eq 'MSWin32', or test
should be skiped if "eval 'use Test::Expect';" fails (now test fails).
So, instead of
BEGIN {
eval 'use Test::Expect';
if ($@) {
print STDERR "All skipped -- requires Test::Expect.\n$@\n";
print "0..0\n";
exit 0;
}
}
there should be
BEGIN {
eval 'use Test::Expect';
if ($@) {
eval 'use Test; plan tests => 34;';
skip('Test::Expect is required');
}
}
--
Serguei Trouchelle