File Coverage

blib/lib/Data/Semantic/Net/IPAddress/TestData/IPv6.pm
Criterion Covered Total %
statement 13 13 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod n/a
total 18 18 100.0


line stmt bran cond sub pod time code
1 1     1   785 use 5.008;
  1         6  
  1         42  
2 1     1   7 use strict;
  1         3  
  1         29  
3 1     1   5 use warnings;
  1         2  
  1         53  
4              
5             package Data::Semantic::Net::IPAddress::TestData::IPv6;
6             BEGIN {
7 1     1   251 $Data::Semantic::Net::IPAddress::TestData::IPv6::VERSION = '1.101760';
8             }
9              
10             # ABSTRACT: Test data class for the IPv4 address semantic data class
11 1         129 use constant TESTDATA => (
12             { args => { forbid_internal => 0 },
13             valid => [
14             qw(
15             ::
16             ::0
17             001::
18             ::1
19             1::
20             1000::
21             ::131:130:1:12
22             2001:0db8::
23             2001:0db8:0000:0000:0000:0000:1428:57ab
24             2001:0db8:0000:0000:0000::1428:57ab
25             2001:0db8:0:0:0:0:1428:57ab
26             2001:0db8:0:0::1428:57ab
27             2001:0db8::1:0
28             2001:0db8::1:0:0
29             2001:0db8::1:0:0:0
30             2001:0db8::1:0:0:0:0
31             2001:0db8:1:0:0:0:0:0
32             2001:0db8::1428:57ab
33             2001::1
34             2001::1:0
35             2001:10::
36             2001::1:0:0
37             2001::1:0:0:0
38             2001::1:0:0:0:0
39             2001::1:0:0:0:0:0
40             2001:10::dead
41             2001:db8::1
42             2001:db8::1428:57ab
43             2001:dead:dead::10:5
44             2345::1:0:0:0:2:0
45             2345::1:0:0:2:0
46             2345::1:0:0:2:0:0
47             2345::1:0:2:0
48             2345::1:0:2:0:0
49             2345::1:0:2:0:0:0
50             3000::1
51             4000::1
52             )
53             ],
54             invalid => [
55             qw(
56             0127.0000.01.000000004
57             10.0.1.3
58             127.0
59             127.0.0.1
60             127.0.0.1
61             131.130.249.31
62             192.168.1.3
63             2001:00db8::
64             2001:0db8::1:0:0:0:0:0:0
65             2001:0db8::1:0:0:0:0:0:0:0
66             2345::1::2
67             )
68             ],
69             normalize => {
70             '::' => '::',
71             '::0' => '::',
72             '001::' => '1::',
73             '0127.0000.01.000000004' => '127.0.1.4',
74             '1000::' => '1000::',
75             '::1' => '::1',
76             '1::' => '1::',
77             '2001:0db8:1:0:0:0:0:0' => '2001:db8:1::',
78             '2001:0db8::1:0:0:0:0' => '2001:db8:0:1::',
79             '2001:0db8::1:0:0:0' => '2001:db8:0:0:1::',
80             '2001:0db8::1:0:0' => '2001:db8::1:0:0',
81             '2001:0db8::1:0' => '2001:db8::1:0',
82             '2001:0db8::' => '2001:db8::',
83             '2001::1:0:0:0:0:0' => '2001:0:1::',
84             '2001::1:0:0:0:0' => '2001:0:0:1::',
85             '2001::1:0:0:0' => '2001::1:0:0:0',
86             '2001::1:0:0' => '2001::1:0:0',
87             '2001::1:0' => '2001::1:0',
88             '2001:10::' => '2001:10::',
89             '2001:10::dead' => '2001:10::dead',
90             '2001::1' => '2001::1',
91             '2001:db8::1' => '2001:db8::1',
92             '2001:dead:dead::10:5' => '2001:dead:dead::10:5',
93             '2345::1:0:0:0:2:0' => '2345:0:1::2:0',
94             '2345::1:0:0:2:0:0' => '2345:0:1::2:0:0',
95             '2345::1:0:0:2:0' => '2345::1:0:0:2:0',
96             '2345::1:0:2:0:0:0' => '2345:0:1:0:2::',
97             '2345::1:0:2:0:0' => '2345::1:0:2:0:0',
98             '2345::1:0:2:0' => '2345::1:0:2:0',
99             '3000::1' => '3000::1',
100             '4000::1' => '4000::1',
101             },
102             },
103             { args => { forbid_internal => 1 },
104             valid => [
105             qw(
106             2001::1
107             2001::1:0
108             2001:10::
109             2001::1:0:0
110             2001::1:0:0:0
111             2001::1:0:0:0:0
112             2001::1:0:0:0:0:0
113             2001:10::dead
114             2001:dead:dead::10:5
115             2345::1:0:0:0:2:0
116             2345::1:0:0:2:0
117             2345::1:0:0:2:0:0
118             2345::1:0:2:0
119             2345::1:0:2:0:0
120             2345::1:0:2:0:0:0
121             3000::1
122             )
123             ],
124             invalid => [
125             qw(
126             ::
127             ::0
128             001::
129             0127.0000.01.000000004
130             ::1
131             1::
132             1000::
133             10.0.1.3
134             127.0
135             127.0.0.1
136             127.0.0.1
137             ::131:130:1:12
138             131.130.249.31
139             192.168.1.3
140             2001:00db8::
141             2001:0db8::
142             2001:0db8:0000:0000:0000:0000:1428:57ab
143             2001:0db8:0000:0000:0000::1428:57ab
144             2001:0db8:0:0:0:0:1428:57ab
145             2001:0db8:0:0::1428:57ab
146             2001:0db8::1:0
147             2001:0db8::1:0:0
148             2001:0db8::1:0:0:0
149             2001:0db8::1:0:0:0:0
150             2001:0db8:1:0:0:0:0:0
151             2001:0db8::1:0:0:0:0:0:0
152             2001:0db8::1:0:0:0:0:0:0:0
153             2001:0db8::1428:57ab
154             2001:db8::1
155             2001:db8::1428:57ab
156             2345::1::2
157             4000::1
158             )
159             ],
160             },
161 1     1   5 );
  1         1  
162             1;
163              
164              
165             __END__