| line |
true |
false |
branch |
|
32
|
1 |
0 |
unless $Test->has_plan |
|
99
|
0 |
12 |
if exists $opts{"test_$test"} |
|
102
|
0 |
1 |
if exists $opts{$opt} |
|
105
|
1 |
0 |
if exists $opts{'all_tests'} |
|
113
|
0 |
45 |
if ($options{'use_file_find'}) { } |
|
115
|
0 |
0 |
if $_ eq 'File::Spec'->curdir or $_ eq 'pm_to_blib' |
|
119
|
0 |
0 |
if $firstdir eq 'blib' or $firstdir eq '_build' |
|
148
|
45 |
0 |
if ($tests{'ansi_chars'}) |
|
149
|
4 |
41 |
unless /^[A-Za-z0-9._][A-Za-z0-9._-]*$/ |
|
153
|
45 |
0 |
if ($tests{'windows_reserved'}) |
|
155
|
0 |
45 |
if $file_name =~ /^(CON|PRN|AUX|NUL|COM[1-9]|LPT[1-9])$/i |
|
159
|
45 |
0 |
if ($tests{'one_dot'}) |
|
160
|
1 |
44 |
if tr/.// > 1 |
|
164
|
45 |
0 |
if ($tests{'special_chars'}) |
|
166
|
1 |
44 |
if m<[!"#\$%&'\(\)\*\+/:;<>\?@\[\\\]^`\{\|\}~]> |
|
170
|
45 |
0 |
if ($tests{'space'}) |
|
171
|
1 |
44 |
if / / |
|
175
|
14 |
31 |
if ($tests{'mac_length'}) |
|
176
|
4 |
10 |
if length $_ > 31 |
|
180
|
14 |
31 |
if ($tests{'amiga_length'}) |
|
181
|
1 |
13 |
if length $_ > 107 |
|
185
|
45 |
0 |
if ($tests{'vms_length'}) |
|
187
|
3 |
42 |
unless length $file_name <= 39 and length $file_ext <= 40 |
|
191
|
14 |
31 |
if ($tests{'dos_length'}) |
|
193
|
7 |
7 |
unless length $file_name <= 8 and length $file_ext <= 4 |
|
197
|
45 |
0 |
if ($tests{'case'}) |
|
198
|
1 |
44 |
if (not $lc_names{$file} and $lc_names{lc $file}) { } |
|
208
|
45 |
0 |
if ($tests{'symlink'}) |
|
209
|
0 |
45 |
if -l $file |
|
213
|
45 |
0 |
if ($tests{'dir_noext'}) |
|
214
|
1 |
44 |
if -d $file and tr/.// > 0 |
|
222
|
0 |
1 |
if ($options{'use_file_find'}) { } |
|
236
|
0 |
1 |
if (keys %$bad_names) { } |
|
242
|
0 |
0 |
unless ref $errors_list{$error} |