use strict;

use Test::More;

plan skip_all => "Pod coverage tests are not active. Please set \$ENV{AUTHOR_TESTING} to activate."

	unless $ENV{AUTHOR_TESTING};

eval "use Test::Pod::Coverage 1.06";

plan skip_all => "Test::Pod::Coverage 1.06 required for testing POD coverage"

	if $@;

# Doesn't this show you why the pod-coverage Kwalitee metric is bull?

my $covered = [ map { qr/\A$_\z/ } qw(

  compare

  constant

  create

  create_b64

  create_bin

  create_from_name

  create_from_name_b64

  create_from_name_bin

  create_from_name_hex

  create_from_name_str

  create_hex

  create_str

  from_b64string

  from_hexstring

  from_string

  new

  to_b64string

  to_hexstring

  to_string  

)];

all_pod_coverage_ok({also_private => $covered });