The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
use Test::More;

eval "use Test::Pod::Coverage 1.00";
plan skip_all => "Test::Pod::Coverage 1.00 required for testing POD coverage"
  if $@;

plan (tests => 1);
pod_coverage_ok (
    "HTML::Normalize",
    {also_private => [qr/^_/],},
    "HTML::Normalize, with leading underscore functions as privates\n",
);