File Coverage

blib/lib/Net/Whois/Object/InetNum.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::InetNum;
2              
3 1     1   81072 use strict;
  1         10  
  1         30  
4 1     1   5 use warnings;
  1         2  
  1         39  
5 1     1   6 use base qw/Net::Whois::Object/;
  1         3  
  1         608  
6              
7             #######################################################################################
8             # The following lines where auto-generated by 'perl whois_to_attribute.pl InetNum'
9              
10             # % This is the RIPE Database query service.
11             # % The objects are in RPSL format.
12             # %
13             # % The RIPE Database is subject to Terms and Conditions.
14             # % See http://www.ripe.net/db/support/db-terms-conditions.pdf
15             #
16             # inetnum: [mandatory] [single] [primary/lookup key]
17             # netname: [mandatory] [single] [lookup key]
18             # descr: [optional] [multiple] [ ]
19             # country: [mandatory] [multiple] [ ]
20             # geoloc: [optional] [single] [ ]
21             # language: [optional] [multiple] [ ]
22             # org: [optional] [single] [inverse key]
23             # sponsoring-org: [optional] [single] [ ]
24             # admin-c: [mandatory] [multiple] [inverse key]
25             # tech-c: [mandatory] [multiple] [inverse key]
26             # abuse-c: [optional] [single] [inverse key]
27             # status: [mandatory] [single] [ ]
28             # remarks: [optional] [multiple] [ ]
29             # notify: [optional] [multiple] [inverse key]
30             # mnt-by: [mandatory] [multiple] [inverse key]
31             # mnt-lower: [optional] [multiple] [inverse key]
32             # mnt-domains: [optional] [multiple] [inverse key]
33             # mnt-routes: [optional] [multiple] [inverse key]
34             # mnt-irt: [optional] [multiple] [inverse key]
35             # created: [generated] [single] [ ]
36             # last-modified: [generated] [single] [ ]
37             # source: [mandatory] [single] [ ]
38             #
39             # % This query was served by the RIPE Database Query Service version 1.99 (BLAARKOP)
40             #
41             #
42             __PACKAGE__->attributes( 'primary', [ 'inetnum' ] );
43             __PACKAGE__->attributes( 'mandatory', [ 'inetnum', 'netname', 'country', 'admin_c', 'tech_c', 'status', 'mnt_by', 'source' ] );
44             __PACKAGE__->attributes( 'optional', [ 'descr', 'geoloc', 'language', 'org', 'sponsoring_org', 'abuse_c', 'remarks', 'notify', 'mnt_lower', 'mnt_domains', 'mnt_routes', 'mnt_irt', 'created', 'last_modified' ] );
45             __PACKAGE__->attributes( 'single', [ 'inetnum', 'netname', 'geoloc', 'org', 'sponsoring_org', 'abuse_c', 'status', 'created', 'last_modified', 'source' ] );
46             __PACKAGE__->attributes( 'multiple', [ 'descr', 'country', 'language', 'admin_c', 'tech_c', 'remarks', 'notify', 'mnt_by', 'mnt_lower', 'mnt_domains', 'mnt_routes', 'mnt_irt' ] );
47              
48             # End of auto-generated lines
49             #######################################################################################
50              
51             =head1 NAME
52              
53             Net::Whois::Object::InetNum - an object representation of a RPSL InetNum block
54              
55             =head1 DESCRIPTION
56              
57             An inetnum object contains information on allocations and assignments
58             of IPv4 address space.
59              
60             =head1 METHODS
61              
62             =head2 new ( @options )
63              
64             Constructor for the Net::Whois::Object::InetNum class
65              
66             =cut
67              
68             sub new {
69 1     1 1 4 my ( $class, @options ) = @_;
70              
71 1         3 my $self = bless {}, $class;
72              
73 1         8 $self->_init(@options);
74              
75 1         4 return $self;
76             }
77              
78             =head2 B
79              
80             Accessor to the inetnum attribute.
81             Accepts an optional inetnum value, always return the current inetnum value.
82              
83             =head2 B
84              
85             Accessor to the netname attribute.
86             Accepts an optional netname, always return the current netname.
87              
88             =head2 B
89              
90             Accessor to the descr attribute.
91             Accepts an optional descr value to be added to the descr array,
92             always return the current descr array.
93              
94             =head2 B
95              
96             Accessor to the country attribute.
97             Accepts an optional country to be added to the country array,
98             always return the current country array.
99              
100             =head2 B
101              
102             Accessor to the geoloc attribute.
103             Accepts an optional geoloc, always return the current geoloc.
104              
105             The location coordinates for the resource
106              
107             Location coordinates of the resource. Can take one of the following forms:
108             [-90,90][-180,180]
109              
110             =head2 B
111              
112             Accessor to the language attribute.
113             Accepts an optional language to be added to the language array,
114             always return the current language array.
115              
116             Identifies the language.
117              
118             Valid two-letter ISO 639-1 language code.
119             =head2 B
120              
121             Accessor to the 'org' attribute.
122             Accepts an optional org, always return the current org.
123              
124             Only a single value for the org attribute is allowed in the Inetnum object.
125             This is to ensure only one organisation is responsible for this resource.
126              
127             =head2 B
128              
129             Accessor to the admin_c attribute.
130             Accepts an optional contact to be added to the admin_c array,
131             always return the current admin_c array.
132              
133             The NIC-handle of an on-site contact Person object. As more than one person
134             often fulfills a role function, there may be more than one admin_c listed.
135              
136             An administrative contact (admin_c) must be someone who is physically
137             located at the site of the network.
138              
139             =head2 B
140              
141             Accessor to the tech_c attribute.
142             Accepts an optional contact to be added to the tech_c array,
143             always return the current tech_c array.
144              
145             The NIC-handle of a technical contact Person or Role object. As more than
146             one person often fulfills a role function, there may be more than one tech_c
147             listed.
148              
149             A technical contact (tech_c) must be a person responsible for the
150             day-to-day operation of the network, but does not need to be
151             physically located at the site of the network.
152              
153             =head2 B
154              
155             Accessor to the 'status' attribute.
156             Accepts an optional status, always return the current status.
157              
158             The status attribute indicates where the address range represented by an
159             inetnum object sits in a hierarchy and how it is used.
160              
161             Status can have one of these values:
162              
163             =over 4
164              
165             =item ALLOCATED UNSPECIFIED
166              
167             =item ALLOCATED PA
168              
169             =item ALLOCATED PI
170              
171             =item LIR-PARTITIONED PA
172              
173             =item LIR-PARTITIONED PI
174              
175             =item SUB-ALLOCATED PA
176              
177             =item ASSIGNED PA
178              
179             =item ASSIGNED PI
180              
181             =item ASSIGNED ANYCAST
182              
183             =item EARLY-REGISTRATION
184              
185             =item NOT-SET
186              
187             =back
188              
189             =head2 B
190              
191             Accessor to the remarks attribute.
192             Accepts an optional remark to be added to the remarks array,
193             always return the current remarks array.
194              
195             General remarks. May include a URL or instructions on where to send abuse
196             complaints.
197              
198             =head2 B
199              
200             Accessor to the notify attribute.
201             Accepts an optional notify value to be added to the notify array,
202             always return the current notify array.
203              
204             The email address to which notifications of changes to this object should be
205             sent.
206              
207             =head2 B
208              
209             Accessor to the mnt_by attribute.
210             Accepts an optional mnt_by value to be added to the mnt_by array,
211             always return the current mnt_by array.
212              
213             Lists a registered Mntner used to authorize and authenticate changes to this
214             object.
215              
216             =head2 B
217              
218             Accessor to the mnt_lower attribute.
219             Accepts an optional mnt_lower value to be added to the mnt_lower array,
220             always return the current mnt_lower array.
221              
222             Sometimes there is a hierarchy of maintainers. In these cases, mnt_lower is
223             used as well as mnt_by.
224              
225             =head2 B
226              
227             Accessor to the mnt_routes attribute.
228             Accepts an optional mnt_route to be added to the mnt_routes array,
229             always return the current mnt_routes array.
230              
231             The identifier of a registered Mntner object used to control the creation of
232             Route objects associated with the address range specified by the Inetnum
233             object.
234              
235             =head2 B
236              
237             Accessor to the mnt_domains attribute.
238             Accepts an optional mnt_domain to be added to the mnt_domains array,
239             always return the current mnt_domains array.
240              
241             The identifier of a registered Mntner object used to control the creation of
242             Domain objects associated with the address range specified by the Inetnum
243             object.
244              
245             =head2 B
246              
247             Accessor to the changed attribute.
248             Accepts an optional changed value to be added to the changed array,
249             always return the current changed array.
250              
251             The email address of who last updated the database object and the date it
252             occurred.
253              
254             Every time a change is made to a database object, this attribute will show
255             the email address of the person who made those changes.
256             Please use the address format specified in RFC 822 - Standard for
257             the Format of ARPA Internet Text Message and provide the date
258             format using one of the following two formats: YYYYMMDD or YYMMDD.
259              
260             =head2 B
261              
262             Accessor to the source attribute.
263             Accepts an optional source, always return the current source.
264              
265             The database where the object is registered.
266              
267             =head2 B
268              
269             Accessor to the mnt_irt attribute.
270             Accepts an optional mnt_irt value to be added to the mnt_irt array,
271             always return the current mnt_irt array.
272              
273             The identifier of a registered Mntner object used to provide information
274             about a Computer Security Incident Response Team (CSIRT).
275              
276             =cut
277              
278             1;