1#!perl -T 2 3use Test::More; 4eval "use Test::Pod::Coverage"; 5plan skip_all => "Test::Pod::Coverage required for testing POD coverage" if $@; 6use Class::Std; 7all_pod_coverage_ok( 8 { also_private => [ qr/^[A-Z_]+$|^uniq$/ ], }, 9); 10