chomp @Core_Modules;
if (eval { require Socket }) {
- push @Core_Modules, qw(Net::Domain);
# Two Net:: modules need the Convert::EBCDIC if in EBDCIC.
if (ord("A") != 193 || eval { require Convert::EBCDIC }) {
push @Core_Modules, qw(Net::Cmd Net::POP3);
} else {
print $message;
}
+print <<'EOREWARD';
+# http://www.xray.mpe.mpg.de/mailing-lists/perl5-porters/2001-04/msg01223.html
+# 20010421230349.P2946@blackrider.blackstar.co.uk
+EOREWARD
my $test_num = 2;
# These modules have no tests of their own.
# Keep up to date with
-# http://www.pobox.com/~schwern/cgi-bin/perl-qa-wiki.cgi?UntestedModules
+# http://perl-qa.hexten.net/wiki/index.php/Untested_Core_Modules
# and vice-versa. The list should only shrink.
__DATA__
-B::C
-B::CC
-B::Stackobj
-ByteLoader
-CPAN
-CPAN::FirstTime
-DynaLoader
-ExtUtils::MM_NW5
-ExtUtils::Install
-ExtUtils::Liblist
-ExtUtils::Mksymlists
-O
-Pod::Plainer
-Test::Harness::Iterator