line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
1
|
|
|
|
|
|
|
# AWS::Greengrass::LoggerDefinition generated from spec 6.3.0 |
2
|
1
|
|
|
1
|
|
708
|
use Moose::Util::TypeConstraints; |
|
1
|
|
|
|
|
4
|
|
|
1
|
|
|
|
|
10
|
|
3
|
|
|
|
|
|
|
|
4
|
|
|
|
|
|
|
coerce 'Cfn::Resource::Properties::AWS::Greengrass::LoggerDefinition', |
5
|
|
|
|
|
|
|
from 'HashRef', |
6
|
|
|
|
|
|
|
via { Cfn::Resource::Properties::AWS::Greengrass::LoggerDefinition->new( %$_ ) }; |
7
|
|
|
|
|
|
|
|
8
|
|
|
|
|
|
|
package Cfn::Resource::AWS::Greengrass::LoggerDefinition { |
9
|
1
|
|
|
1
|
|
2152
|
use Moose; |
|
1
|
|
|
|
|
3
|
|
|
1
|
|
|
|
|
8
|
|
10
|
|
|
|
|
|
|
extends 'Cfn::Resource'; |
11
|
|
|
|
|
|
|
has Properties => (isa => 'Cfn::Resource::Properties::AWS::Greengrass::LoggerDefinition', is => 'rw', coerce => 1); |
12
|
|
|
|
|
|
|
|
13
|
|
|
|
|
|
|
sub AttributeList { |
14
|
1
|
|
|
1
|
0
|
4
|
[ 'Arn','Id','LatestVersionArn','Name' ] |
15
|
|
|
|
|
|
|
} |
16
|
|
|
|
|
|
|
sub supported_regions { |
17
|
1
|
|
|
1
|
0
|
1103
|
[ 'ap-northeast-1','ap-northeast-2','ap-south-1','ap-southeast-1','ap-southeast-2','cn-north-1','eu-central-1','eu-west-1','eu-west-2','us-east-1','us-east-2','us-gov-west-1','us-west-2' ] |
18
|
|
|
|
|
|
|
} |
19
|
|
|
|
|
|
|
} |
20
|
|
|
|
|
|
|
|
21
|
|
|
|
|
|
|
|
22
|
|
|
|
|
|
|
subtype 'ArrayOfCfn::Resource::Properties::AWS::Greengrass::LoggerDefinition::Logger', |
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::Greengrass::LoggerDefinition::Logger', |
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::Greengrass::LoggerDefinition::Logger')->coerce($_) |
41
|
|
|
|
|
|
|
} @$_ |
42
|
|
|
|
|
|
|
]); |
43
|
|
|
|
|
|
|
}; |
44
|
|
|
|
|
|
|
|
45
|
|
|
|
|
|
|
subtype 'Cfn::Resource::Properties::AWS::Greengrass::LoggerDefinition::Logger', |
46
|
|
|
|
|
|
|
as 'Cfn::Value'; |
47
|
|
|
|
|
|
|
|
48
|
|
|
|
|
|
|
coerce 'Cfn::Resource::Properties::AWS::Greengrass::LoggerDefinition::Logger', |
49
|
|
|
|
|
|
|
from 'HashRef', |
50
|
|
|
|
|
|
|
via { |
51
|
|
|
|
|
|
|
if (my $f = Cfn::TypeLibrary::try_function($_)) { |
52
|
|
|
|
|
|
|
return $f |
53
|
|
|
|
|
|
|
} else { |
54
|
|
|
|
|
|
|
return Cfn::Resource::Properties::AWS::Greengrass::LoggerDefinition::LoggerValue->new( %$_ ); |
55
|
|
|
|
|
|
|
} |
56
|
|
|
|
|
|
|
}; |
57
|
|
|
|
|
|
|
|
58
|
|
|
|
|
|
|
package Cfn::Resource::Properties::AWS::Greengrass::LoggerDefinition::LoggerValue { |
59
|
1
|
|
|
1
|
|
7323
|
use Moose; |
|
1
|
|
|
|
|
3
|
|
|
1
|
|
|
|
|
6
|
|
60
|
1
|
|
|
1
|
|
6630
|
use MooseX::StrictConstructor; |
|
1
|
|
|
|
|
3
|
|
|
1
|
|
|
|
|
10
|
|
61
|
|
|
|
|
|
|
extends 'Cfn::Value::TypedValue'; |
62
|
|
|
|
|
|
|
|
63
|
|
|
|
|
|
|
has Component => (isa => 'Cfn::Value::String', is => 'rw', coerce => 1, required => 1, traits => [ 'CfnMutability' ], mutability => 'Immutable'); |
64
|
|
|
|
|
|
|
has Id => (isa => 'Cfn::Value::String', is => 'rw', coerce => 1, required => 1, traits => [ 'CfnMutability' ], mutability => 'Immutable'); |
65
|
|
|
|
|
|
|
has Level => (isa => 'Cfn::Value::String', is => 'rw', coerce => 1, required => 1, traits => [ 'CfnMutability' ], mutability => 'Immutable'); |
66
|
|
|
|
|
|
|
has Space => (isa => 'Cfn::Value::Integer', is => 'rw', coerce => 1, traits => [ 'CfnMutability' ], mutability => 'Immutable'); |
67
|
|
|
|
|
|
|
has Type => (isa => 'Cfn::Value::String', is => 'rw', coerce => 1, required => 1, traits => [ 'CfnMutability' ], mutability => 'Immutable'); |
68
|
|
|
|
|
|
|
} |
69
|
|
|
|
|
|
|
|
70
|
|
|
|
|
|
|
subtype 'Cfn::Resource::Properties::AWS::Greengrass::LoggerDefinition::LoggerDefinitionVersion', |
71
|
|
|
|
|
|
|
as 'Cfn::Value'; |
72
|
|
|
|
|
|
|
|
73
|
|
|
|
|
|
|
coerce 'Cfn::Resource::Properties::AWS::Greengrass::LoggerDefinition::LoggerDefinitionVersion', |
74
|
|
|
|
|
|
|
from 'HashRef', |
75
|
|
|
|
|
|
|
via { |
76
|
|
|
|
|
|
|
if (my $f = Cfn::TypeLibrary::try_function($_)) { |
77
|
|
|
|
|
|
|
return $f |
78
|
|
|
|
|
|
|
} else { |
79
|
|
|
|
|
|
|
return Cfn::Resource::Properties::AWS::Greengrass::LoggerDefinition::LoggerDefinitionVersionValue->new( %$_ ); |
80
|
|
|
|
|
|
|
} |
81
|
|
|
|
|
|
|
}; |
82
|
|
|
|
|
|
|
|
83
|
|
|
|
|
|
|
package Cfn::Resource::Properties::AWS::Greengrass::LoggerDefinition::LoggerDefinitionVersionValue { |
84
|
1
|
|
|
1
|
|
3592
|
use Moose; |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
6
|
|
85
|
1
|
|
|
1
|
|
6577
|
use MooseX::StrictConstructor; |
|
1
|
|
|
|
|
3
|
|
|
1
|
|
|
|
|
5
|
|
86
|
|
|
|
|
|
|
extends 'Cfn::Value::TypedValue'; |
87
|
|
|
|
|
|
|
|
88
|
|
|
|
|
|
|
has Loggers => (isa => 'ArrayOfCfn::Resource::Properties::AWS::Greengrass::LoggerDefinition::Logger', is => 'rw', coerce => 1, required => 1, traits => [ 'CfnMutability' ], mutability => 'Immutable'); |
89
|
|
|
|
|
|
|
} |
90
|
|
|
|
|
|
|
|
91
|
|
|
|
|
|
|
package Cfn::Resource::Properties::AWS::Greengrass::LoggerDefinition { |
92
|
1
|
|
|
1
|
|
3304
|
use Moose; |
|
1
|
|
|
|
|
3
|
|
|
1
|
|
|
|
|
6
|
|
93
|
1
|
|
|
1
|
|
6904
|
use MooseX::StrictConstructor; |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
5
|
|
94
|
|
|
|
|
|
|
extends 'Cfn::Resource::Properties'; |
95
|
|
|
|
|
|
|
|
96
|
|
|
|
|
|
|
has InitialVersion => (isa => 'Cfn::Resource::Properties::AWS::Greengrass::LoggerDefinition::LoggerDefinitionVersion', is => 'rw', coerce => 1, traits => [ 'CfnMutability' ], mutability => 'Immutable'); |
97
|
|
|
|
|
|
|
has Name => (isa => 'Cfn::Value::String', is => 'rw', coerce => 1, required => 1, traits => [ 'CfnMutability' ], mutability => 'Mutable'); |
98
|
|
|
|
|
|
|
has Tags => (isa => 'Cfn::Value::Json|Cfn::DynamicValue', is => 'rw', coerce => 1, traits => [ 'CfnMutability' ], mutability => 'Mutable'); |
99
|
|
|
|
|
|
|
} |
100
|
|
|
|
|
|
|
|
101
|
|
|
|
|
|
|
1; |