OLD | NEW |
(Empty) | |
| 1 require 5.00503; |
| 2 use strict; |
| 3 use ExtUtils::MakeMaker; |
| 4 |
| 5 use lib qw( ./lib ); |
| 6 |
| 7 $| = 1; |
| 8 |
| 9 eval q| require JSON |; |
| 10 |
| 11 # B module can't install? I'm not careful for such a problem. |
| 12 # Leave us alone today? |
| 13 if ($@) { |
| 14 print "We try to look up lib/JSON.pm, but in vain. B module can't install?\n
"; |
| 15 print "Set the environmental variable 'PERL_DL_NONLAZY' with 0.\n"; |
| 16 print "And see to ExtUtils::MM_Unix.\n"; |
| 17 print "perl says : $@"; |
| 18 print "We do not make Makefile by requiring Perl version 7.0.\n"; |
| 19 require 7.0000; |
| 20 } |
| 21 |
| 22 |
| 23 my $version = JSON->VERSION; |
| 24 my $message; |
| 25 |
| 26 |
| 27 print <<EOF; |
| 28 Welcome to JSON (v.$version) |
| 29 ============================= |
| 30 $message |
| 31 |
| 32 ************************** CAUTION ************************** |
| 33 * This is 'JSON version 2' and there are many differences * |
| 34 * to version 1.xx * |
| 35 * Please check your applications useing old version. * |
| 36 * See to 'INCOMPATIBLE CHANGES TO OLD VERSION' and 'TIPS' * |
| 37 ************************************************************* |
| 38 |
| 39 |
| 40 EOF |
| 41 |
| 42 |
| 43 WriteMakefile( |
| 44 'NAME' => 'JSON', |
| 45 'VERSION_FROM' => 'lib/JSON.pm', # finds $VERSION |
| 46 'PREREQ_PM' => { |
| 47 'Test::More' => 0, |
| 48 }, |
| 49 ($] >= 5.005 ? ## Add these new keywords supported since 5.005 |
| 50 (ABSTRACT_FROM => 'lib/JSON.pm', # retrieve abstract from module |
| 51 AUTHOR => 'Makamaka Hannyaharamitu, E<lt>makamaka[at]cpan.orgE<gt>')
: ()), |
| 52 ( $ExtUtils::MakeMaker::VERSION >= 6.3002 ? ('LICENSE' => 'perl', ) : () ), |
| 53 |
| 54 ( $ExtUtils::MakeMaker::VERSION >= 6.46 ? ( |
| 55 'META_MERGE' => { |
| 56 resources => { |
| 57 repository => 'https://github.com/makamaka/JSON', |
| 58 }, |
| 59 recommends => { |
| 60 'JSON::XS' => JSON->require_xs_version, |
| 61 }, |
| 62 } ) : () |
| 63 ), |
| 64 ); |
| 65 |
| 66 |
| 67 if ($] < 5.006) { # I saw to http://d.hatena.ne.jp/asakusabashi/20051231/p1 |
| 68 open(IN, "Makefile"); |
| 69 open(OUT,">Makefile.tmp") || die; |
| 70 while(<IN>) { |
| 71 s/PERL_DL_NONLAZY=1//g; |
| 72 print OUT; |
| 73 } |
| 74 close(OUT); |
| 75 close(IN); |
| 76 rename("Makefile.tmp" => "Makefile"); |
| 77 } |
OLD | NEW |