I thought some of you might find this of interest and then I realized that a Test::Cookbook might be useful. Here's a problem I recently faced and how I solved it:
Problem: POD is incomplete in a module but you still want to test POD coverage with something like Test::Pod::Coverage::all_pod_coverage_ok(). Solution: Have a hash of modules to skip and use TPC's all_modules() function to ensure you don't miss new modules. 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 %TODO = map { $_ => 1 } @modules_with_incomplete_pod; my @modules = Test::Pod::Coverage::all_modules(); plan tests => scalar @modules; foreach my $module (@modules) { if (exists $TODO{$module}) { TODO: { local $TODO = "Known incomplete POD for $module"; pod_coverage_ok($module); }; } else { pod_coverage_ok($module); } } Discussion. Actually, I'd rather have a Test::Cookbook discussion. You can see the intent of the above code. It's not perfect (and I'm open to suggestions for improvement), but it's something that is not immediately obvious to someone who just started testing. Cheers, Ovid ===== Silence is Evil http://users.easystreet.com/ovid/philosophy/decency.html Ovid http://www.perlmonks.org/index.pl?node_id=17000 Web Programming with Perl http://users.easystreet.com/ovid/cgi_course/