1use strict; 2 3use lib ('./blib','../blib', './lib', '../lib'); 4 5unless ($ENV{'TEST_POD_COVERAGE'}) { 6 $|++; 7 print "1..0 # Skipped: To enable POD coverage test set TEST_POD_COVERAGE=1\n"; 8 exit; 9} 10 11eval { 12 require Test::More; 13}; 14if ($@) { 15 $|++; 16 print "1..0 # Skipped: Test::More required for testing POD coverage\n"; 17 exit; 18} 19eval { 20 require Pod::Coverage; 21}; 22if ($@ or (not defined $Pod::Coverage::VERSION) or ($Pod::Coverage::VERSION < 0.17)) { 23 Test::More::plan (skip_all => "Pod::Coverage 0.17 required for testing POD coverage"); 24 exit; 25} 26eval { 27 require Test::Pod::Coverage; 28}; 29if ($@ or (not defined $Test::Pod::Coverage::VERSION) or ($Test::Pod::Coverage::VERSION < 1.06)) { 30 Test::More::plan (skip_all => "Test::Pod::Coverage 1.06 required for testing POD coverage"); 31 exit; 32} 33 34Test::More::plan (tests => 2); 35 36Test::Pod::Coverage::pod_coverage_ok( 'Lingua::Stem', { also_private => ['DEBUG'] }); 37Test::Pod::Coverage::pod_coverage_ok( 'Lingua::Stem::En', { also_private => ['DEBUG'] }); 38