Commit | Line | Data |
---|---|---|
77983856 | 1 | #!perl |
e59193fb | 2 | |
3 | use Test::More; | |
77983856 | 4 | eval "use Test::Pod::Coverage 1.08"; |
5 | warn $@ if $@; | |
e59193fb | 6 | plan skip_all => "Test::Pod::Coverage 1.04 required for testing POD coverage" if $@; |
77983856 | 7 | |
8 | my @modules = grep { ! /::Traits?::/ } all_modules(); | |
9 | ||
10 | plan tests => scalar(@modules); | |
11 | ||
12 | foreach my $module (@modules) { | |
13 | pod_coverage_ok($module); | |
14 | } | |
15 |