| line |
true |
false |
branch |
|
24
|
3 |
2 |
if (-d $file) |
|
29
|
0 |
5 |
unless (-e $file) |
|
34
|
0 |
5 |
unless (-f $file) |
|
49
|
2 |
3 |
if (-f "$file.snapshot") |
|
58
|
0 |
2 |
if (exists $srcs{$provide}) |
|
67
|
0 |
2 |
if (ref $opts->{'source'} eq 'HASH') |
|
79
|
0 |
5 |
unless ($opts->{'skip-perl'}) |
|
82
|
0 |
0 |
if $result |
|
86
|
0 |
5 |
if $result |
|
116
|
6 |
9 |
if ($module eq 'perl') |
|
149
|
0 |
6 |
unless $no_error |
|
167
|
0 |
3 |
if (my $line = !(readline($snap_fh) =~ /$snapshot_re/)) |
|
178
|
12 |
30 |
if ($line =~ /^ \Q$prefix\E (\S+?) :? $/msx) |
|
187
|
27 |
3 |
if ($line =~ /^ \Q$prefix\E (\S+?) (?: :? \s (.*) )? $/msx) |
|
193
|
3 |
0 |
unless ($line =~ /^ \Q$prefix\E /msx) |