File Coverage: t/09-pod-new-modules.t

# File Coverage

File: | t/09-pod-new-modules.t
Coverage: | 100.0%

line | stmt | bran | cond | sub | pod | time | code
--- | --- | --- | --- | --- | --- | --- | ---
1 | 1 1 1 |  |  | 1 |  | 4800 3 42 | use strict;
2 | 1 1 1 |  |  | 1 |  | 5 2 62 | use warnings;
3 |
4 | 1 1 1 |  |  | 1 |  | 392 1473 154 | use FindBin qw/$Bin/;
5 | 1 1 1 |  |  | 1 |  | 627 105352 6 | use Test::More;
6 | 1 1 1 |  |  | 1 |  | 489 41167 1322 | use Pod::Simple::Checker;
7 |
8 | 1 |  |  |  |  | 82295 | for my $file ( qw/Constants.pm Validation.pm/ ) {
9 | 2 |  |  |  |  | 418 | my $path = qq{$Bin/../lib/OpenMP/Environment/$file};
10 | 2 |  |  |  |  | 11 | my $checker = Pod::Simple::Checker->new;
11 | 2 |  |  |  |  | 136 | $checker->output_string(\my $output);
12 | 2 |  |  |  |  | 103 | $checker->parse_file($path);
13 | 2 |  |  |  |  | 81221 | ok !$checker->any_errata_seen, qq{OpenMP::Environment::$file POD parses without errors};
14 |  |  |  |  |  |  | }
15 |
16 | 1 |  |  |  |  | 264 | done_testing;
17 |