$ perl -I. -MPod::Coverage -e 'my $pc = Pod::Coverage::->new(package => "XYZ"); print $pc->coverage ? "Y" : "N"'