line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
1
|
|
|
|
|
|
|
# AWS::WAFRegional::IPSet generated from spec 5.0.0 |
2
|
1
|
|
|
1
|
|
553
|
use Moose::Util::TypeConstraints; |
|
1
|
|
|
|
|
3
|
|
|
1
|
|
|
|
|
8
|
|
3
|
|
|
|
|
|
|
|
4
|
|
|
|
|
|
|
coerce 'Cfn::Resource::Properties::AWS::WAFRegional::IPSet', |
5
|
|
|
|
|
|
|
from 'HashRef', |
6
|
|
|
|
|
|
|
via { Cfn::Resource::Properties::AWS::WAFRegional::IPSet->new( %$_ ) }; |
7
|
|
|
|
|
|
|
|
8
|
|
|
|
|
|
|
package Cfn::Resource::AWS::WAFRegional::IPSet { |
9
|
1
|
|
|
1
|
|
1999
|
use Moose; |
|
1
|
|
|
|
|
3
|
|
|
1
|
|
|
|
|
6
|
|
10
|
|
|
|
|
|
|
extends 'Cfn::Resource'; |
11
|
|
|
|
|
|
|
has Properties => (isa => 'Cfn::Resource::Properties::AWS::WAFRegional::IPSet', is => 'rw', coerce => 1); |
12
|
|
|
|
|
|
|
|
13
|
|
|
|
|
|
|
sub AttributeList { |
14
|
1
|
|
|
1
|
0
|
4
|
[ ] |
15
|
|
|
|
|
|
|
} |
16
|
|
|
|
|
|
|
sub supported_regions { |
17
|
1
|
|
|
1
|
0
|
892
|
[ 'ap-northeast-1','ap-northeast-2','ap-southeast-1','ap-southeast-2','eu-central-1','eu-north-1','eu-west-1','eu-west-2','us-east-1','us-east-2','us-west-1','us-west-2' ] |
18
|
|
|
|
|
|
|
} |
19
|
|
|
|
|
|
|
} |
20
|
|
|
|
|
|
|
|
21
|
|
|
|
|
|
|
|
22
|
|
|
|
|
|
|
subtype 'ArrayOfCfn::Resource::Properties::AWS::WAFRegional::IPSet::IPSetDescriptor', |
23
|
|
|
|
|
|
|
as 'Cfn::Value', |
24
|
|
|
|
|
|
|
where { $_->isa('Cfn::Value::Array') or $_->isa('Cfn::Value::Function') }, |
25
|
|
|
|
|
|
|
message { "$_ is not a Cfn::Value or a Cfn::Value::Function" }; |
26
|
|
|
|
|
|
|
|
27
|
|
|
|
|
|
|
coerce 'ArrayOfCfn::Resource::Properties::AWS::WAFRegional::IPSet::IPSetDescriptor', |
28
|
|
|
|
|
|
|
from 'HashRef', |
29
|
|
|
|
|
|
|
via { |
30
|
|
|
|
|
|
|
if (my $f = Cfn::TypeLibrary::try_function($_)) { |
31
|
|
|
|
|
|
|
return $f |
32
|
|
|
|
|
|
|
} else { |
33
|
|
|
|
|
|
|
die 'Only accepts functions'; |
34
|
|
|
|
|
|
|
} |
35
|
|
|
|
|
|
|
}, |
36
|
|
|
|
|
|
|
from 'ArrayRef', |
37
|
|
|
|
|
|
|
via { |
38
|
|
|
|
|
|
|
Cfn::Value::Array->new(Value => [ |
39
|
|
|
|
|
|
|
map { |
40
|
|
|
|
|
|
|
Moose::Util::TypeConstraints::find_type_constraint('Cfn::Resource::Properties::AWS::WAFRegional::IPSet::IPSetDescriptor')->coerce($_) |
41
|
|
|
|
|
|
|
} @$_ |
42
|
|
|
|
|
|
|
]); |
43
|
|
|
|
|
|
|
}; |
44
|
|
|
|
|
|
|
|
45
|
|
|
|
|
|
|
subtype 'Cfn::Resource::Properties::AWS::WAFRegional::IPSet::IPSetDescriptor', |
46
|
|
|
|
|
|
|
as 'Cfn::Value'; |
47
|
|
|
|
|
|
|
|
48
|
|
|
|
|
|
|
coerce 'Cfn::Resource::Properties::AWS::WAFRegional::IPSet::IPSetDescriptor', |
49
|
|
|
|
|
|
|
from 'HashRef', |
50
|
|
|
|
|
|
|
via { |
51
|
|
|
|
|
|
|
if (my $f = Cfn::TypeLibrary::try_function($_)) { |
52
|
|
|
|
|
|
|
return $f |
53
|
|
|
|
|
|
|
} else { |
54
|
|
|
|
|
|
|
return Cfn::Resource::Properties::AWS::WAFRegional::IPSet::IPSetDescriptorValue->new( %$_ ); |
55
|
|
|
|
|
|
|
} |
56
|
|
|
|
|
|
|
}; |
57
|
|
|
|
|
|
|
|
58
|
|
|
|
|
|
|
package Cfn::Resource::Properties::AWS::WAFRegional::IPSet::IPSetDescriptorValue { |
59
|
1
|
|
|
1
|
|
6933
|
use Moose; |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
6
|
|
60
|
1
|
|
|
1
|
|
6492
|
use MooseX::StrictConstructor; |
|
1
|
|
|
|
|
3
|
|
|
1
|
|
|
|
|
7
|
|
61
|
|
|
|
|
|
|
extends 'Cfn::Value::TypedValue'; |
62
|
|
|
|
|
|
|
|
63
|
|
|
|
|
|
|
has Type => (isa => 'Cfn::Value::String', is => 'rw', coerce => 1, required => 1, traits => [ 'CfnMutability' ], mutability => 'Mutable'); |
64
|
|
|
|
|
|
|
has Value => (isa => 'Cfn::Value::String', is => 'rw', coerce => 1, required => 1, traits => [ 'CfnMutability' ], mutability => 'Mutable'); |
65
|
|
|
|
|
|
|
} |
66
|
|
|
|
|
|
|
|
67
|
|
|
|
|
|
|
package Cfn::Resource::Properties::AWS::WAFRegional::IPSet { |
68
|
1
|
|
|
1
|
|
3338
|
use Moose; |
|
1
|
|
|
|
|
3
|
|
|
1
|
|
|
|
|
4
|
|
69
|
1
|
|
|
1
|
|
6439
|
use MooseX::StrictConstructor; |
|
1
|
|
|
|
|
3
|
|
|
1
|
|
|
|
|
4
|
|
70
|
|
|
|
|
|
|
extends 'Cfn::Resource::Properties'; |
71
|
|
|
|
|
|
|
|
72
|
|
|
|
|
|
|
has IPSetDescriptors => (isa => 'ArrayOfCfn::Resource::Properties::AWS::WAFRegional::IPSet::IPSetDescriptor', is => 'rw', coerce => 1, traits => [ 'CfnMutability' ], mutability => 'Mutable'); |
73
|
|
|
|
|
|
|
has Name => (isa => 'Cfn::Value::String', is => 'rw', coerce => 1, required => 1, traits => [ 'CfnMutability' ], mutability => 'Immutable'); |
74
|
|
|
|
|
|
|
} |
75
|
|
|
|
|
|
|
|
76
|
|
|
|
|
|
|
1; |