1
0

pod-coverage.t 551 B

123456789101112131415161718
  1. use strict;
  2. use warnings;
  3. use Test::More;
  4. # Ensure a recent version of Test::Pod::Coverage
  5. my $min_tpc = 1.08;
  6. eval "use Test::Pod::Coverage $min_tpc";
  7. plan skip_all => "Test::Pod::Coverage $min_tpc required for testing POD coverage"
  8. if $@;
  9. # Test::Pod::Coverage doesn't require a minimum Pod::Coverage version,
  10. # but older versions don't recognize some common documentation styles
  11. my $min_pc = 0.18;
  12. eval "use Pod::Coverage $min_pc";
  13. plan skip_all => "Pod::Coverage $min_pc required for testing POD coverage"
  14. if $@;
  15. all_pod_coverage_ok();