The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
#!perl
use 5.010000;
use Test::Most;

# Ensure a recent version of Test::Pod::Coverage
my $min_tpc = 1.08;
eval "use Test::Pod::Coverage $min_tpc";
plan skip_all =>
  "Test::Pod::Coverage $min_tpc required for testing POD coverage"
  if $@;

# Test::Pod::Coverage doesn't require a minimum Pod::Coverage version,
# but older versions don't recognize some common documentation styles
my $min_pc = 0.18;
eval "use Pod::Coverage $min_pc";
plan skip_all => "Pod::Coverage $min_pc required for testing POD coverage"
  if $@;

# probably should figure up how to Pod::Coverage-compatible-POD up the not-
# BUILD attribute thingies here... (olden perl versions fail on "new" method
# that Moo makes, so put in an exception for that)
all_pod_coverage_ok(
  { trustme => [
      qr/BUILD|atonal|get_contrary|get_modal_chrome|get_retrograde|get_transpose|has_modal_in|has_modal_out|has_modal_scale_in|has_modal_scale_out|new/
    ]
  }
);