t/00-report-prereqs.t

   1 use strict;
   2 use warnings;
   3
   4 if (!eval { require ExtUtils::MakeMaker }) {
   5   print "1..0 # SKIP ExtUtils::MakeMaker not available\n";
   6   exit 0;
   7 }
   8
   9 print "1..1\n";
  10 print "ok 1\n";
  11 print STDERR "#\n# Optional Prereq Versions:\n";
  12 for my $module (qw(
  13   Config::General
  14   Config::Tiny
  15   Cpanel::JSON::XS
  16   JSON::MaybeXS
  17   JSON::DWIW
  18   JSON::XS
  19   JSON::Syck
  20   JSON::PP
  21   JSON
  22   XML::Simple
  23   XML::NamespaceSupport
  24   YAML::XS
  25   YAML::Syck
  26   YAML
  27 )) {
  28   my $file = "$module.pm";
  29   $file =~ s{::}{/}g;
  30   my ($full_file) = grep -e, map "$_/$file", @INC;
  31   my $v;
  32   if (defined $full_file) {
  33     $v = MM->parse_version($full_file);
  34   }
  35   else {
  36     $v = 'missing';
  37   }
  38   printf STDERR "#   %-25s %s\n", $module, $v;
  39 }
  40 print STDERR "#\n";