my @pods = qw( HACKERS PPPort.pm ppport.h );

# Try loading Test::Pod eval q{ use Test::Pod; $Test::Pod::VERSION >= 0.95 or die "Test::Pod version only $Test::Pod::VERSION"; import Test::Pod tests => scalar @pods; };

my $TP = $@ eq '';

unless ($TP) { load(); plan(tests => scalar @pods); }

for (@pods) { print "# checking $_\n"; if ($TP) { pod_file_ok($_); } else { skip("skip: Test::Pod >= 0.95 required", 0); } }