1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
|
use strict;
use warnings;
BEGIN {
my @devmods = qw(
Module::Install::AuthorTests
Module::Install::ReadmeFromPod
Module::Install::Repository
);
my @not_available;
{
$|=1;
local *STDOUT;
eval qq{use inc::Module::Install; 1;} or push @not_available, 'inc::Module::Install';
}
for my $mod (@devmods) {
eval qq{require $mod} or push @not_available, $mod;
}
if (@not_available) {
print qq{# The following modules are not available.\n};
print qq{# `$^X $0 | cpanm` will install them:\n};
print $_, "\n" for @not_available;
print "\n";
exit -1;
}
}
use inc::Module::Install;
$Module::Install::AUTHOR = 0 if $ENV{TRAVIS};
name 'JSON-Types';
all_from 'lib/JSON/Types.pm';
test_requires 'Test::More' => '0.86';
test_requires 'JSON';
requires 'perl' => '5.008001';
requires 'parent';
readme_from 'lib/JSON/Types.pm';
author_tests 'xt';
auto_set_repository;
WriteAll;
|
