I'm not trying to test a distribution (in the strictest sense of the word), but I am trying to test a collection of database-interaction modules.
my first thought, since this isn't a packaged dist, was to use all_modules( $dir );, but that gives me:
but the code is very straightforward, or so i thought:[me@2 t]$ prove -v 900_pod_coverage.t 900_pod_coverage....Undefined subroutine &main::all_modules called at +900_pod_coverage.t line 9.
I must be missing something obvious. Sure, I could switch over to something like readdir() ... At this point, I want to know if I'm way of the path of the module's intentions, since the perldoc isn't too descriptive.# -*- perl -*- # t/900_pod_coverage.t - check POD coverage for new modules use Test::Pod::Coverage; # tests => 1; use lib qw# /home/httpd/path/to/my/plugins/ #; my $dir = q{/home/httpd/path/to/my/plugins/}; ## also tried the commented out ... # my @moduleList = all_modules( 'DataClasses' ); my @moduleList = all_modules( $dir ); foreach my $mod ( @moduleList ) { pod_coverage_ok( $mod, 'reporting code is documented' ); }
In reply to Test::Pod::Coverage and all_pod_coverage_ok by geektron
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |