package main; use strict; use warnings; BEGIN { eval { require Test::More; Test::More->import(); }; if ($@) { print "1..0 # skip Test::More required to test pod coverage.\n"; exit; } eval { require Test::Pod::Coverage; Test::Pod::Coverage->VERSION(1.00); Test::Pod::Coverage->import(); }; if ($@) { print < [ qr{^[[:upper:]\d_]+$}, qr{^parse_(?:string|file)$} ], coverage_class => 'Pod::Coverage::CountParents' }); 1;