line |
true |
false |
branch |
67
|
0 |
35 |
if exists $$self{'VERSION'} and $$self{'VERSION'} < $Parse::Yapp::Driver::COMPATIBLE |
73
|
0 |
35 |
if ref $class |
85
|
0 |
37 |
if ($$self{'DEBUG'}) { } |
88
|
0 |
0 |
if $@ |
99
|
0 |
0 |
unless exists $$self{'USER'} |
151
|
0 |
0 |
if $index < 0 and -$index <= @{$$self{'STACK'};} |
161
|
4 |
4 |
if @_ |
169
|
4 |
24 |
if @_ |
198
|
0 |
216 |
unless exists $$checklist{$prm} |
200
|
0 |
216 |
unless ref $value eq $$checklist{$prm} |
206
|
0 |
111 |
unless exists $$outhash{$_} |
219
|
0 |
0 |
if exists ${'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
|
7108 |
20832 |
if (exists $$actions{'ACTIONS'}) { } |
286
|
5882 |
1226 |
unless (defined $$token) |
292
|
1226 |
4 |
exists $$actions{'DEFAULT'} ? : |
|
5878 |
1230 |
exists $$actions{'ACTIONS'}{$$token} ? : |
305
|
27936 |
4 |
if (defined $act) |
308
|
5878 |
22058 |
if ($act > 0) |
314
|
0 |
5878 |
if ($$errstatus) |
329
|
5845 |
33 |
if $$token ne '' |
342
|
33 |
22025 |
unless $act |
348
|
1884 |
20174 |
if (unpack('A1', $lhs) eq '@') |
349
|
0 |
1884 |
unless $lhs =~ /^\@[0-9]+\-([0-9]+)$/ |
356
|
21387 |
671 |
$$dotpos ? : |
359
|
10287 |
467 |
@sempar ? : |
|
11304 |
10754 |
$code ? : |
365
|
33 |
22025 |
if ($$check eq 'ACCEPT') |
374
|
0 |
22025 |
if ($$check eq 'ABORT') |
387
|
22025 |
0 |
unless ($$check eq 'ERROR') |
415
|
4 |
0 |
unless ($$errstatus) |
419
|
0 |
4 |
unless $$errstatus |
433
|
0 |
4 |
if ($$errstatus == 3) |
435
|
0 |
0 |
if ($$token eq '') |
461
|
4 |
0 |
unless (@$stack) |