#!perl -T

use strict;
use Test::More;
eval "use Test::Pod::Coverage 0.08";
plan skip_all => "Test::Pod::Coverage required for testing POD coverage" if $@;

my %exception_for = ();

my @modules = Test::Pod::Coverage::all_modules();
plan tests => scalar @modules;

foreach my $module (@modules) {
    my $exception = $exception_for{$module};
    pod_coverage_ok( $module, $exception ? { trustme => [$exception] } : () );
}




syntax highlighted by Code2HTML, v. 0.9.1