| line |
true |
false |
branch |
|
140
|
20 |
7 |
if -f $file |
|
144
|
5 |
3 |
if -f $full_path |
|
172
|
1 |
22 |
if (grep {$_->file eq $full_path;} @{$self->_stack;}) |
|
178
|
1 |
21 |
unless open my $fh, $full_path |
|
184
|
0 |
48 |
unless $fh |
|
186
|
30 |
18 |
if defined $text |
|
223
|
10 |
96 |
unless @input |
|
226
|
32 |
64 |
if (ref $input[0]) |
|
228
|
29 |
3 |
if (defined $text) { } |
|
239
|
4 |
60 |
unless defined $_ |
|
240
|
56 |
4 |
if (/ \G ( .*? \n | .+ ) /cgx) |
|
241
|
52 |
4 |
if pos $_ == length $_ |
|
278
|
33 |
109 |
unless @{$self->_stack;} |
|
283
|
27 |
82 |
unless (defined $text) |
|
298
|
1 |
4 |
unless defined $next |
|
309
|
18 |
64 |
if ($text =~ /^ \s* [\#\%] /cgix) { } |
|
310
|
6 |
12 |
if ($text =~ / \G line /cgix) { } |
|
|
12 |
0 |
elsif ($text =~ / \G include /cgix) { } |
|
313
|
6 |
0 |
if ($text =~ / \G \s+ (\d+) /cgix) |
|
316
|
3 |
3 |
if ($text =~ / \G \+ (\d+) /cgix) { } |
|
323
|
4 |
2 |
if ($text =~ / \G \s+ \"? ([^\"\s]+) \"? /cgix) |
|
337
|
11 |
1 |
if ($text =~ / \G \s+ (?: \< ([^\>]+) \> |
\' ([^\']+) \' |
\" ([^\"]+) \" |
(\S+)
) /cgix) { } |