| line |
true |
false |
branch |
|
68
|
0 |
7 |
if exists $self->{'VERSION'} and $self->{'VERSION'} < $Parse::Yapp::Driver::COMPATIBLE |
|
73
|
0 |
7 |
if ref $class |
|
85
|
0 |
7 |
if ($self->{'DEBUG'}) { } |
|
88
|
0 |
0 |
if $@ |
|
100
|
0 |
0 |
unless exists $self->{'USER'} |
|
152
|
0 |
0 |
if $index < 0 and -$index <= @{$self->{'STACK'};} |
|
161
|
0 |
0 |
if @_ |
|
169
|
0 |
0 |
if @_ |
|
198
|
0 |
42 |
unless exists $checklist->{$prm} |
|
200
|
0 |
42 |
unless ref $value eq $checklist->{$prm} |
|
206
|
0 |
21 |
unless exists $outhash->{$_} |
|
220
|
0 |
0 |
if exists do {
'Parse::Yapp::Driver::'
}->{'_DBParse'} |
|
224
|
0 |
0 |
unless open DRV, "<$fname" |
|
227
|
0 |
0 |
if (/^\s*sub\s+_Parse\s*{\s*$/ .. /^\s*}\s*#\s*_Parse\s*$/) |
|
283
|
265 |
411 |
if (exists $actions->{'ACTIONS'}) { } |
|
286
|
258 |
7 |
unless (defined $$token) |
|
296
|
7 |
0 |
exists $actions->{'DEFAULT'} ? : |
|
|
258 |
7 |
exists $actions->{'ACTIONS'}{$$token} ? : |
|
305
|
676 |
0 |
if (defined $act) |
|
308
|
258 |
418 |
if ($act > 0) |
|
314
|
0 |
258 |
if ($$errstatus) |
|
329
|
251 |
7 |
if $$token ne '' |
|
342
|
7 |
411 |
unless $act |
|
348
|
0 |
418 |
if (unpack('A1', $lhs) eq '@') |
|
349
|
0 |
0 |
unless $lhs =~ /^\@[0-9]+\-([0-9]+)$/ |
|
356
|
418 |
0 |
$$dotpos ? : |
|
359
|
7 |
0 |
@sempar ? : |
|
|
411 |
7 |
$code ? : |
|
365
|
7 |
411 |
if ($$check eq 'ACCEPT') |
|
374
|
0 |
411 |
if ($$check eq 'ABORT') |
|
387
|
411 |
0 |
unless ($$check eq 'ERROR') |
|
415
|
0 |
0 |
unless ($$errstatus) |
|
419
|
0 |
0 |
unless $$errstatus |
|
433
|
0 |
0 |
if ($$errstatus == 3) |
|
435
|
0 |
0 |
if ($$token eq '') |
|
461
|
0 |
0 |
unless (@$stack) |