File Coverage

blib/lib/XML/SRS/FieldList.pm
Criterion Covered Total %
statement 2 4 50.0
branch n/a
condition n/a
subroutine 2 2 100.0
pod n/a
total 4 6 66.6


line stmt bran cond sub pod time code
1              
2             package XML::SRS::FieldList;
3             BEGIN {
4 1     1   10127 $XML::SRS::FieldList::VERSION = '0.09';
5             }
6              
7 1     1   509 use Moose;
  0            
  0            
8             use PRANG::Graph;
9              
10             use Moose::Util::TypeConstraints;
11              
12             has_attr 'status' =>
13             is => 'ro',
14             isa => 'XML::SRS::Boolean',
15             xml_required => 0,
16             xml_name => 'Status',
17             ;
18              
19             has_attr 'name_servers' =>
20             is => 'ro',
21             isa => 'XML::SRS::Boolean',
22             xml_required => 0,
23             xml_name => 'NameServers',
24             ;
25            
26             has_attr 'dns_sec' =>
27             is => 'ro',
28             isa => 'XML::SRS::Boolean',
29             xml_required => 0,
30             xml_name => 'DNSSEC',
31             ;
32              
33             has_attr 'registrant_contact' =>
34             is => 'ro',
35             isa => 'XML::SRS::Boolean',
36             xml_required => 0,
37             xml_name => 'RegistrantContact',
38             ;
39              
40             has_attr 'registered_date' =>
41             is => 'ro',
42             isa => 'XML::SRS::Boolean',
43             xml_required => 0,
44             xml_name => 'RegisteredDate',
45             ;
46              
47             has_attr 'admin_contact' =>
48             is => 'ro',
49             isa => 'XML::SRS::Boolean',
50             xml_required => 0,
51             xml_name => 'AdminContact',
52             ;
53              
54             has_attr 'technical_contact' =>
55             is => 'ro',
56             isa => 'XML::SRS::Boolean',
57             xml_required => 0,
58             xml_name => 'TechnicalContact',
59             ;
60              
61             has_attr 'locked_date' =>
62             is => 'ro',
63             isa => 'XML::SRS::Boolean',
64             xml_required => 0,
65             xml_name => 'LockedDate',
66             ;
67              
68             has_attr 'delegate' =>
69             is => 'ro',
70             isa => 'XML::SRS::Boolean',
71             xml_required => 0,
72             xml_name => 'Delegate',
73             ;
74              
75             has_attr 'registrar_id' =>
76             is => 'ro',
77             isa => 'XML::SRS::Boolean',
78             xml_required => 0,
79             xml_name => 'RegistrarId',
80             ;
81              
82             has_attr 'registrar_name' =>
83             is => 'ro',
84             isa => 'XML::SRS::Boolean',
85             xml_required => 0,
86             xml_name => 'RegistrarName',
87             ;
88              
89             has_attr 'registrant_ref' =>
90             is => 'ro',
91             isa => 'XML::SRS::Boolean',
92             xml_required => 0,
93             xml_name => 'RegistrantRef',
94             ;
95              
96             has_attr 'last_action_id' =>
97             is => 'ro',
98             isa => 'XML::SRS::Boolean',
99             xml_required => 0,
100             xml_name => 'LastActionId',
101             ;
102              
103             has_attr 'changed_by_registrar_id' =>
104             is => 'ro',
105             isa => 'XML::SRS::Boolean',
106             xml_required => 0,
107             xml_name => 'ChangedByRegistrarId',
108             ;
109              
110             has_attr 'term' =>
111             is => 'ro',
112             isa => 'XML::SRS::Boolean',
113             xml_required => 0,
114             xml_name => 'Term',
115             ;
116              
117             has_attr 'billed_until' =>
118             is => 'ro',
119             isa => 'XML::SRS::Boolean',
120             xml_required => 0,
121             xml_name => 'BilledUntil',
122             ;
123              
124             has_attr 'cancelled_date' =>
125             is => 'ro',
126             isa => 'XML::SRS::Boolean',
127             xml_required => 0,
128             xml_name => 'CancelledDate',
129             ;
130              
131             has_attr 'audit_text' =>
132             is => 'ro',
133             isa => 'XML::SRS::Boolean',
134             xml_required => 0,
135             xml_name => 'AuditText',
136             ;
137              
138             has_attr 'effective_from' =>
139             is => 'ro',
140             isa => 'XML::SRS::Boolean',
141             xml_required => 0,
142             xml_name => 'EffectiveFrom',
143             ;
144              
145             has_attr 'default_contacts' =>
146             is => 'ro',
147             isa => 'XML::SRS::Boolean',
148             xml_required => 0,
149             xml_name => 'DefaultContacts',
150             ;
151              
152             with 'XML::SRS::Node';
153              
154             coerce __PACKAGE__
155             => from 'ArrayRef'
156             => via {
157             my %params = map { $_ => 1 } @{$_[0]};
158              
159             __PACKAGE__->new(
160             %params,
161             );
162             };
163              
164             1;