0026d9628cc995de647d8c36a907a2882e640cfd
[urisagit/Perl-Docs.git] / t / pod_coverage.t
1 #!/usr/local/bin/perl
2
3 use Test::More;
4
5 eval 'use Test::Pod::Coverage 1.04' ;
6 plan skip_all =>
7         'Test::Pod::Coverage 1.04 required for testing POD coverage' if $@ ;
8
9 all_pod_coverage_ok(
10         {
11                 trustme =>      [
12                         'slurp',
13                         'O_APPEND',
14                         'O_BINARY',
15                         'O_CREAT',
16                         'O_EXCL',
17                         'O_RDONLY',
18                         'O_WRONLY',
19                         'SEEK_CUR',
20                         'SEEK_END',
21                         'SEEK_SET',
22                 ],
23         }
24 ) ;