File Coverage

blib/lib/Data/Semantic/URI/TestData/ftp.pm
Criterion Covered Total %
statement 18 18 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod n/a
total 24 24 100.0


line stmt bran cond sub pod time code
1 1     1   828 use 5.008;
  1         6  
  1         150  
2 1     1   6 use strict;
  1         2  
  1         36  
3 1     1   6 use warnings;
  1         2  
  1         59  
4              
5             package Data::Semantic::URI::TestData::ftp;
6             our $VERSION = '1.100850';
7             # ABSTRACT: Test data class for the ftp URI semantic data class
8 1     1   7 use Test::More;
  1         12  
  1         9  
9 1     1   307 no warnings 'qw'; # Possible attempt to put comments in qw() list
  1         2  
  1         243  
10 1         130 use constant TESTDATA => (
11             { args => {},
12             valid => [
13             qw(
14             ftp://ftp.example.com/**!(),,
15             ftp://127.0.0.1
16             ftp://127.0.0.1/
17             ftp://127.0.0.1:12345/some/file
18             ftp://abigail:secret:here@127.0.0.1:21/some/file
19             ftp://abigail:secret@127.0.0.1:21/some/file
20             ftp://abigail:secret@ftp.example.com:21/some/file
21             ftp://abigail@ftp.example.com
22             ftp://abigail@ftp.example.com/some/path/somewhere;type=a
23             ftp://abigail@ftp.example.com:21/some/file
24             ftp://ftp.example.com
25             ftp://ftp.example.com/%7Eabigail/
26             ftp://ftp.example.com/
27             ftp://ftp.example.com/--_$.+++
28             ftp://ftp.example.com/.
29             ftp://ftp.example.com/;type=I
30             ftp://ftp.example.com/some/directory/some/where/
31             ftp://ftp.example.com/some/file/some/where
32             ftp://ftp.example.com/some/path;type=A
33             ftp://ftp.example.com/some/path;type=i
34             ftp://ftp.example.com/~abigail/
35             ftp://ftp.example.com:21/some/file
36             ftp://www.example.com//////////////
37             ftp://www.example.com/:@=&=
38             )
39             ],
40             invalid => [
41             qw(
42             FTP://ftp.example.com/
43             HTTP://ftp.example.com/
44             ftp://ftp.example.com/`
45             ftp://ftp.example.com/nope|nope
46             ftp://ftp.example.com/some/??
47             ftp://ftp.example.com/some/path;type=AI
48             ftp://ftp.example.com/some/path;type=Q
49             ftp://ftp.example.com/some/path?query/path
50             ftp://ftp.example.com/some/path?query1?query2
51             ftp://ftp.example.com:21/some/path?query
52             ftp://www.example.com/some/file#target
53             ftp://www.example.com/some/path;here
54             http://ftp.example.com/
55             )
56             ],
57             },
58             { args => { password => 1 },
59             valid => [
60             qw(
61             ftp://ftp.example.com/**!(),,
62             ftp://127.0.0.1
63             ftp://127.0.0.1/
64             ftp://127.0.0.1:12345/some/file
65             ftp://abigail:secret@127.0.0.1:21/some/file
66             ftp://abigail:secret@ftp.example.com:21/some/file
67             ftp://abigail@ftp.example.com
68             ftp://abigail@ftp.example.com/some/path/somewhere;type=a
69             ftp://abigail@ftp.example.com:21/some/file
70             ftp://ftp.example.com
71             ftp://ftp.example.com/%7Eabigail/
72             ftp://ftp.example.com/
73             ftp://ftp.example.com/--_$.+++
74             ftp://ftp.example.com/.
75             ftp://ftp.example.com/;type=I
76             ftp://ftp.example.com/some/directory/some/where/
77             ftp://ftp.example.com/some/file/some/where
78             ftp://ftp.example.com/some/path;type=A
79             ftp://ftp.example.com/some/path;type=i
80             ftp://ftp.example.com/~abigail/
81             ftp://ftp.example.com:21/some/file
82             ftp://www.example.com//////////////
83             ftp://www.example.com/:@=&=
84             )
85             ],
86             invalid => [
87             qw(
88             FTP://ftp.example.com/
89             HTTP://ftp.example.com/
90             ftp://abigail:secret:here@127.0.0.1:21/some/file
91             ftp://ftp.example.com/`
92             ftp://ftp.example.com/nope|nope
93             ftp://ftp.example.com/some/??
94             ftp://ftp.example.com/some/path;type=AI
95             ftp://ftp.example.com/some/path;type=Q
96             ftp://ftp.example.com/some/path?query/path
97             ftp://ftp.example.com/some/path?query1?query2
98             ftp://ftp.example.com:21/some/path?query
99             ftp://www.example.com/some/file#target
100             ftp://www.example.com/some/path;here
101             http://ftp.example.com/
102             )
103             ],
104             },
105             { args => { type => '[AIDaid]' },
106             valid => [
107             qw(
108             ftp://ftp.example.com/**!(),,
109             ftp://127.0.0.1
110             ftp://127.0.0.1/
111             ftp://127.0.0.1:12345/some/file
112             ftp://abigail:secret:here@127.0.0.1:21/some/file
113             ftp://abigail:secret@127.0.0.1:21/some/file
114             ftp://abigail:secret@ftp.example.com:21/some/file
115             ftp://abigail@ftp.example.com
116             ftp://abigail@ftp.example.com/some/path/somewhere;type=a
117             ftp://abigail@ftp.example.com:21/some/file
118             ftp://ftp.example.com
119             ftp://ftp.example.com/%7Eabigail/
120             ftp://ftp.example.com/
121             ftp://ftp.example.com/--_$.+++
122             ftp://ftp.example.com/.
123             ftp://ftp.example.com/;type=I
124             ftp://ftp.example.com/some/directory/some/where/
125             ftp://ftp.example.com/some/file/some/where
126             ftp://ftp.example.com/some/path;type=A
127             ftp://ftp.example.com/some/path;type=D
128             ftp://ftp.example.com/some/path;type=i
129             ftp://ftp.example.com/~abigail/
130             ftp://ftp.example.com:21/some/file
131             ftp://www.example.com//////////////
132             ftp://www.example.com/:@=&=
133             )
134             ],
135             invalid => [
136             qw(
137             FTP://ftp.example.com/
138             HTTP://ftp.example.com/
139             ftp://ftp.example.com/`
140             ftp://ftp.example.com/nope|nope
141             ftp://ftp.example.com/some/??
142             ftp://ftp.example.com/some/path;type=AI
143             ftp://ftp.example.com/some/path?query/path
144             ftp://ftp.example.com/some/path?query1?query2
145             ftp://ftp.example.com:21/some/path?query
146             ftp://www.example.com/some/file#target
147             ftp://www.example.com/some/path;here
148             http://ftp.example.com/
149             )
150             ],
151             },
152 1     1   6 );
  1         2  
153             1;
154              
155              
156             __END__