view release on metacpan or  search on metacpan

Makefile.PL  view on Meta::CPAN

use 5.000;
use ExtUtils::MakeMaker;
# See lib/ExtUtils/MakeMaker.pm for details of how to influence
# the contents of the Makefile that is written.

use File::Spec::Functions;

my $class_std_dir = (reverse glob (catdir(updir(), "Class-Std*")))[0];
my $file = catfile $class_std_dir, "README";

if (-d $class_std_dir && -f $file && open R, $file) {
    local $/;
    my $readme = <R>;
    $readme =~ s/\s+/ /gs; # Normalise all whitespace;
    if ($readme =~ /^Class::Std version/
	&& $readme =~ m!redistribute it and/or modify it under the same terms as Perl itself!) {
	# All systems go for plagiary
	my $his_testdir = catdir ($class_std_dir, "t");