| line |
true |
false |
branch |
|
99
|
3 |
2 |
if ($code =~ /^use\s+( (?:$ident::)* $ident ):(?:auth\(Any\):)?(?:ver)?<(v?[\d+ '.']*\d+)>;$/x) |
|
104
|
2 |
0 |
if ($code =~ /^use\s+(\S+?)(?:-|\s+)([0-9._]+).*;$/) { } |
|
|
0 |
0 |
elsif ($code =~ /^use\s(\S+)\s*;$/) { } |
|
120
|
0 |
0 |
unless $_ eq $file |
|
121
|
0 |
0 |
unless not $version or $version and $File::Find::name =~ m[$name-$version/lib] |
|
125
|
0 |
0 |
unless @candidates |
|
127
|
0 |
0 |
if ($version) |
|
130
|
0 |
0 |
if (m[\Q$name-$version\E/lib]) |
|
147
|
0 |
0 |
if (m[$name-([0-9\.]+)/lib/]) |
|
187
|
0 |
0 |
unless $code |
|
190
|
0 |
0 |
unless $name |
|
192
|
0 |
0 |
if (my $path = $self->search($module_path, $name, $version, $auth)) |
|
193
|
0 |
0 |
unless open my $fh, $path |
|
202
|
0 |
0 |
if ($PERLROCKS_WITH_B_HOOKS_PARSER) |
|
211
|
0 |
0 |
if ($$rock{'__parser_hook'}) |