File Coverage

blib/lib/Net/Whois/Object/Organisation/AFRINIC.pm
Criterion Covered Total %
statement 13 13 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod 1 1 100.0
total 18 18 100.0


line stmt bran cond sub pod time code
1             package Net::Whois::Object::Organisation::AFRINIC;
2              
3 1     1   8 use strict;
  1         2  
  1         39  
4 1     1   6 use warnings;
  1         2  
  1         42  
5 1     1   5 use base qw/Net::Whois::Object::Organisation/;
  1         2  
  1         554  
6              
7             # whois -h whois.afrinic.net -t organisation
8             #
9             # % This is the AfriNIC Whois server.
10             #
11             # organisation: [mandatory] [single] [primary/look-up key]
12             # org-name: [mandatory] [single] [lookup key]
13             # org-type: [mandatory] [single] [ ]
14             # descr: [optional] [multiple] [ ]
15             # country: [mandatory] [multiple] [ ]
16             # remarks: [optional] [multiple] [ ]
17             # address: [mandatory] [multiple] [ ]
18             # phone: [optional] [multiple] [ ]
19             # fax-no: [optional] [multiple] [ ]
20             # e-mail: [mandatory] [multiple] [lookup key]
21             # org: [optional] [multiple] [inverse key]
22             # admin-c: [optional] [multiple] [inverse key]
23             # tech-c: [optional] [multiple] [inverse key]
24             # ref-nfy: [optional] [multiple] [inverse key]
25             # mnt-ref: [mandatory] [multiple] [inverse key]
26             # notify: [optional] [multiple] [inverse key]
27             # abuse-mailbox: [optional] [multiple] [inverse key]
28             # mnt-by: [mandatory] [multiple] [inverse key]
29             # changed: [mandatory] [multiple] [ ]
30             # source: [mandatory] [single] [ ]
31              
32             __PACKAGE__->attributes( 'primary', ['organisation'] );
33             __PACKAGE__->attributes( 'mandatory', [ 'organisation', 'org_name', 'org_type', 'country', 'address', 'e_mail', 'mnt_ref', 'mnt_by', 'changed', 'source' ] );
34             __PACKAGE__->attributes( 'optional', [ 'descr', 'remarks', 'phone', 'fax_no', 'org', 'admin_c', 'tech_c', 'ref_nfy', 'notify', 'abuse_mailbox' ] );
35             __PACKAGE__->attributes( 'single', [ 'organisation', 'org_name', 'org_type', 'source' ] );
36             __PACKAGE__->attributes( 'multiple', [ 'descr', 'country', 'remarks', 'address', 'phone', 'fax_no', 'e_mail', 'org', 'admin_c', 'tech_c', 'ref_nfy', 'mnt_ref', 'notify','abuse_mailbox', 'mnt_by', 'changed' ] );
37              
38             =head1 NAME
39              
40             Net::Whois::Object::Organisation - an object representation of the RPSL Organisation block
41              
42             =head1 DESCRIPTION
43              
44             The organisation object is designed to provide an easy way of mapping resources to a particular organisaiton.
45              
46             =head1 METHODS
47              
48             =head2 B
49              
50             Constructor for the Net::Whois::Object::Organisation class
51              
52             =cut
53              
54             sub new {
55 1     1 1 5 my ( $class, @options ) = @_;
56              
57 1         4 my $self = bless {}, $class;
58 1         10 $self->_init(@options);
59              
60 1         4 return $self;
61             }
62              
63             =head2 B
64              
65             Accessor to the organisation attribute.
66             Accepts an optional organisation, always return the current organisation.
67              
68             =head2 B
69              
70             Accessor to the org_name attribute.
71             Accepts an optional org_name, always return the current org_name.
72              
73             =head2 B
74              
75             Accessor to the org_type attribute.
76             Accepts an optional org_type, always return the current org_type.
77              
78             Possible values are:
79             IANA for Internet Assigned Numbers Authority, RIR for Regional Internet
80             Registries, NIR for National Internet Registries, LIR for Local Internet
81             Registries, and OTHER for all other organisations.
82              
83             =head2 B
84              
85             Accessor to the org attribute.
86             Accepts an optional org, always return the current org.
87              
88             Points to an existing organisation object representing the entity that
89             holds the resource.
90              
91             The 'ORG-' string followed by 2 to 4 characters, followed by up to 5 digits
92             followed by a source specification. The first digit must not be "0".
93             Source specification starts with "-" followed by source name up to
94             9-character length.
95              
96             =head2 B
97              
98             Accessor to the address attribute.
99             Accepts an optional address line to be added to the address array,
100             always return the current address array.
101              
102             =head2 B
103              
104             Accessor to the phone attribute.
105             Accepts an optional phone number to be added to the phone array,
106             always return the current phone array.
107              
108             =head2 B
109              
110             Accessor to the fax_no attribute.
111             Accepts an optional fax_no to be added to the fax_no array,
112             always return the current fax_no array.
113              
114             =head2 B
115              
116             Accessor to the e_mail attribute.
117             Accepts an optional e_mail to be added to the e_mail array,
118             always return the current e_mail array.
119              
120             =head2 B
121              
122             Accessor to the country attribute.
123             Accepts an optional country to be added to the country array,
124             always return the current country array.
125              
126             =head2 B
127              
128             Accessor to the language attribute.
129             Accepts an optional language to be added to the language array,
130             always return the current language array.
131              
132             =head2 B
133              
134             Accessor to the admin_c attribute.
135             Accepts an optional contact to be added to the admin_c array,
136             always return the current admin_c array.
137              
138             =head2 B
139              
140             Accessor to the tech_c attribute.
141             Accepts an optional contact to be added to the tech_c array,
142             always return the current tech_c array.
143              
144             =head2 B
145              
146             Accessor to the descr attribute.
147             Accepts an optional descr line to be added to the descr array,
148             always return the current descr array.
149              
150             =head2 B
151              
152             Accessor to the remarks attribute.
153             Accepts an optional remark to be added to the remarks array,
154             always return the current remarks array.
155              
156             =head2 B
157              
158             Accessor to the notify attribute.
159             Accepts an optional notify value to be added to the notify array,
160             always return the current notify array.
161              
162             =head2 B
163              
164             Accessor to the mnt_by attribute.
165             Accepts an optional mnt_by value to be added to the mnt_by array,
166             always return the current mnt_by array.
167              
168             =head2 B
169              
170             Accessor to the changed attribute.
171             Accepts an optional changed value to be added to the changed array,
172             always return the current changed array.
173              
174             =head2 B
175              
176             Accessor to the source attribute.
177             Accepts an optional source, always return the current source.
178              
179             =head2 B
180              
181             Accessor to the ref_nfy attribute.
182             Accepts an optional ref_nfy value to be added to the ref_nfy array,
183             always return the current ref_nfy array.
184              
185             =head2 B
186              
187             Accessor to the mnt_ref attribute.
188             Accepts an optional mnt_ref value to be added to the mnt_ref array,
189             always return the current mnt_ref array.
190              
191             =cut
192              
193             1;