| line |
true |
false |
branch |
|
138
|
20 |
7 |
if -f $file |
|
142
|
5 |
3 |
if -f $full_path |
|
170
|
1 |
22 |
if (grep {$_->file eq $full_path;} @{$self->_stack;}) |
|
176
|
1 |
21 |
unless open my $fh, $full_path |
|
182
|
0 |
48 |
unless $fh |
|
184
|
30 |
18 |
if defined $text |
|
221
|
10 |
96 |
unless @input |
|
224
|
32 |
64 |
if (ref $input[0]) |
|
226
|
29 |
3 |
if (defined $text) { } |
|
237
|
4 |
60 |
unless defined $_ |
|
238
|
56 |
4 |
if (/ \G ( .*? \n | .+ ) /cgx) |
|
239
|
52 |
4 |
if pos $_ == length $_ |
|
276
|
33 |
109 |
unless @{$self->_stack;} |
|
281
|
27 |
82 |
unless (defined $text) |
|
296
|
1 |
4 |
unless defined $next |
|
307
|
18 |
64 |
if ($text =~ /^ \s* [\#\%] /cgix) { } |
|
308
|
6 |
12 |
if ($text =~ / \G line /cgix) { } |
|
|
12 |
0 |
elsif ($text =~ / \G include /cgix) { } |
|
311
|
6 |
0 |
if ($text =~ / \G \s+ (\d+) /cgix) |
|
314
|
3 |
3 |
if ($text =~ / \G \+ (\d+) /cgix) { } |
|
321
|
4 |
2 |
if ($text =~ / \G \s+ \"? ([^\"\s]+) \"? /cgix) |
|
335
|
11 |
1 |
if ($text =~ / \G \s+ (?: \< ([^\>]+) \> |
\' ([^\']+) \' |
\" ([^\"]+) \" |
(\S+)
) /cgix) { } |