1package main; 2 3use strict; 4use warnings; 5 6use Test::More 0.96; 7 8BEGIN { 9 10 eval { 11 require Test::Pod::Coverage; 12 Test::Pod::Coverage->VERSION(1.00); 13 Test::Pod::Coverage->import(); 14 1; 15 } or do { 16 plan skip_all => 'Test::Pod::Coverage 1.00 or greater required.'; 17 exit; 18 }; 19 20} 21 22all_pod_coverage_ok ({ 23 also_private => [ qr{^[[:upper:]\d_]+$}, qr{^parse_(?:string|file)$} ], 24 coverage_class => 'Pod::Coverage::CountParents' 25 }); 26 271; 28