| line |
true |
false |
branch |
|
150
|
20 |
0 |
unless (defined $sep) |
|
151
|
0 |
10 |
$word =~ /\./ ? : |
|
|
10 |
10 |
$word =~ /::/ ? : |
|
159
|
1 |
190 |
if ($tmp =~ /\A\Q$_\E(?:(\Q$sep\E).*|\z)/) |
|
183
|
0 |
682 |
if ref $inc |
|
184
|
506 |
176 |
length $fspath ? : |
|
185
|
460 |
222 |
unless opendir my $dh, $dir |
|
187
|
444 |
4614 |
if $_ eq '.' or $_ eq '..' |
|
188
|
208 |
4406 |
unless /\A\w+(\.\w+)?\z/ |
|
190
|
1883 |
2523 |
if $isint and not $is_dir |
|
191
|
2343 |
1 |
if $is_dir and $isint || $find_prefix |
|
192
|
126 |
2397 |
if /(.+)\.pm\z/ and $find_pm |
|
193
|
10 |
2513 |
if /(.+)\.pmc\z/ and $find_pmc |
|
194
|
17 |
2506 |
if /(.+)\.pod\z/ and $find_pod |