view release on metacpan or  search on metacpan

Makefile.PL  view on Meta::CPAN

my %FallbackPrereqs = (
  "Moo" => 0,
  "Test::Exception" => 0,
  "Test::More" => 0,
  "Types::Standard" => 0
);


unless ( eval { ExtUtils::MakeMaker->VERSION(6.63_03) } ) {
  delete $WriteMakefileArgs{TEST_REQUIRES};
  delete $WriteMakefileArgs{BUILD_REQUIRES};
  $WriteMakefileArgs{PREREQ_PM} = \%FallbackPrereqs;
}

delete $WriteMakefileArgs{CONFIGURE_REQUIRES}
  unless eval { ExtUtils::MakeMaker->VERSION(6.52) };

WriteMakefile(%WriteMakefileArgs);

t/03_conformance.t  view on Meta::CPAN

 }, 
 { argv => [ '{', 'X', ' Y ', '}' ],
   struct => { X => ' Y ' },
 },
 { argv => [ '{', 'X', 'Y=Y', '}' ],
   struct => { X => 'Y=Y' },
 },
);

foreach $test (@tests) {
  eval {
    is_deeply(
      ARGV::Struct->new(argv => $test->{ argv })->parse,
      $test->{ struct },
      "Conformance of " . join ' ', @{ $test->{ argv } }
    );
  };
  if ($@){
    fail((join ' ', @{ $test->{ argv } }) . " DIED $@");
  }
}

t/pod.t  view on Meta::CPAN

use Test::More;
use strict;
use warnings;

eval "use Test::Pod 1.00";
plan skip_all => "Test::Pod 1.00 required for testing POD" if $@;
my @poddirs = qw( lib auto-lib );
all_pod_files_ok( all_pod_files( @poddirs ) );