9 'Browser::Open' => '0',
10 'Capture::Tiny' => '0',
11 'Class::XSAccessor' => '0',
15 'PPI::HTML' => '1.07',
16 'Parallel::Iterator' => '0',
17 'Pod::Coverage' => '0.06',
18 'Pod::Coverage::CountParents' => '0',
21 'namespace::clean' => '0',
24 plan tests => keys(%$TESTED_PREREQS) + 1;
26 my @tests = map [ $_ => $TESTED_PREREQS->{$_} ], keys %$TESTED_PREREQS;
27 push @tests, [ 'Devel::Cover' => '1.20' ];
29 for my $test (@tests) {
30 my ($module, $version) = @$test;
32 if ($version && $version !~ /^[0._]*$/) {
33 eval "use $module $version ()";
34 is $@, '', "$module v$version is available";
36 eval "use $module ()";
37 is $@, '', "any version of $module is available";