line |
true |
false |
branch |
32
|
1 |
0 |
unless $Test->has_plan |
98
|
0 |
0 |
if exists $opts{"test_$test"} |
101
|
0 |
0 |
if exists $opts{$opt} |
104
|
0 |
0 |
if exists $opts{'all_tests'} |
112
|
0 |
30 |
if ($options{'use_file_find'}) { } |
114
|
0 |
0 |
if $_ eq 'File::Spec'->curdir or $_ eq 'pm_to_blib' |
118
|
0 |
0 |
if $firstdir eq 'blib' or $firstdir eq '_build' |
147
|
30 |
0 |
if ($tests{'ansi_chars'}) |
148
|
0 |
30 |
unless /^[A-Za-z0-9._][A-Za-z0-9._-]*$/ |
152
|
30 |
0 |
if ($tests{'one_dot'}) |
153
|
0 |
30 |
if tr/.// > 1 |
157
|
30 |
0 |
if ($tests{'special_chars'}) |
159
|
0 |
30 |
if m<[!"#\$%&'\(\)\*\+/:;<>\?@\[\\\]^`\{\|\}~]> |
163
|
30 |
0 |
if ($tests{'space'}) |
164
|
0 |
30 |
if / / |
168
|
0 |
30 |
if ($tests{'mac_length'}) |
169
|
0 |
0 |
if length $_ > 31 |
173
|
0 |
30 |
if ($tests{'amiga_length'}) |
174
|
0 |
0 |
if length $_ > 107 |
178
|
30 |
0 |
if ($tests{'vms_length'}) |
180
|
0 |
30 |
unless length $file_name <= 39 and length $file_ext <= 40 |
184
|
0 |
30 |
if ($tests{'dos_length'}) |
186
|
0 |
0 |
unless length $file_name <= 8 and length $file_ext <= 4 |
190
|
30 |
0 |
if ($tests{'case'}) |
191
|
0 |
30 |
if (not $lc_names{$file} and $lc_names{lc $file}) { } |
201
|
30 |
0 |
if ($tests{'symlink'}) |
202
|
0 |
30 |
if -l $file |
206
|
30 |
0 |
if ($tests{'dir_noext'}) |
207
|
0 |
30 |
if -d $file and tr/.// > 0 |
215
|
0 |
1 |
if ($options{'use_file_find'}) { } |
228
|
0 |
1 |
if (keys %bad_names) { } |
234
|
0 |
0 |
unless ref $errors_list{$error} |