| line |
true |
false |
branch |
|
113
|
5 |
3 |
if ($args{-'components'}) |
|
119
|
6 |
0 |
unless $component =~ s/^\+// |
|
124
|
4 |
2 |
if @sub_grammar |
|
129
|
5 |
0 |
unless (@{$class . '::ISA';}) |
|
141
|
1 |
3 |
if ($type eq 'IGNORE') { } |
|
142
|
0 |
1 |
unless ref $args{-'fields'}{'IGNORE'} eq 'Regexp' |
|
148
|
0 |
3 |
unless does($fields_aref, 'ARRAY') |
|
172
|
40 |
4 |
if $context |
|
194
|
0 |
10 |
unless my $compiled_grammar = eval "use Regexp::Grammars; qr{$grammar}x" |
|
208
|
0 |
36 |
if &blessed($data) and $data->can('param') |
|
221
|
1 |
27 |
if $$self{'IGNORE'} and $field =~ /$$self{'IGNORE'}/ |
|
222
|
0 |
50 |
unless my $val = $$data{$field} |
|
229
|
41 |
9 |
if ($val =~ $grammar->with_actions($self)) { } |
|
238
|
5 |
31 |
if %errors |
|
241
|
2 |
29 |
if $$self{'multicols_sep'} |
|
279
|
1 |
1 |
@$conditions > 1 ? : |
|
285
|
0 |
2 |
if $previous_and |
|
286
|
1 |
1 |
if @and_conditions |
|
299
|
0 |
1 |
$ref ? : |
|
|
1 |
1 |
$is_in ? : |
|
308
|
0 |
3 |
unless @$cols == @single_vals |
|
327
|
3 |
2 |
if (ref $vals) { } |
|
328
|
0 |
3 |
unless ref $vals eq 'HASH' |
|
330
|
0 |
3 |
if @others |
|
331
|
1 |
2 |
if ($op eq '-in') { } |
|
|
2 |
0 |
elsif ($op eq '=') { } |
|
365
|
4 |
30 |
$n_values > 1 ? : |
|
372
|
4 |
0 |
if length $$h{'year'} < 3 |
|
391
|
3 |
54 |
$is_pattern ? : |