line |
true |
false |
branch |
69
|
0 |
1 |
if exists $$self{'VERSION'} and $$self{'VERSION'} < $Text::Spintax::Parse::Yapp::Driver::COMPATIBLE |
75
|
0 |
1 |
if ref $class |
87
|
0 |
1 |
if ($$self{'DEBUG'}) { } |
90
|
0 |
0 |
if $@ |
101
|
1 |
41 |
unless exists $$self{'USER'} |
153
|
0 |
0 |
if $index < 0 and -$index <= @{$$self{'STACK'};} |
163
|
0 |
0 |
if @_ |
171
|
0 |
0 |
if @_ |
200
|
0 |
5 |
unless exists $$checklist{$prm} |
202
|
0 |
5 |
unless ref $value eq $$checklist{$prm} |
208
|
0 |
3 |
unless exists $$outhash{$_} |
221
|
0 |
0 |
if exists ${'Text::Spintax::Parse::Yapp::Driver::';}{'_DBParse'} |
226
|
0 |
0 |
unless open DRV, "<$fname" |
229
|
0 |
0 |
if (/^\s*sub\s+_Parse\s*{\s*$/ .. /^\s*}\s*#\s*_Parse\s*$/) |
285
|
8 |
25 |
if (exists $$actions{'ACTIONS'}) { } |
288
|
8 |
0 |
unless (defined $$token) |
294
|
0 |
0 |
exists $$actions{'DEFAULT'} ? : |
|
8 |
0 |
exists $$actions{'ACTIONS'}{$$token} ? : |
307
|
33 |
0 |
if (defined $act) |
310
|
8 |
25 |
if ($act > 0) |
316
|
0 |
8 |
if ($$errstatus) |
331
|
7 |
1 |
if $$token ne '' |
344
|
1 |
24 |
unless $act |
350
|
0 |
25 |
if (unpack('A1', $lhs) eq '@') |
351
|
0 |
0 |
unless $lhs =~ /^\@[0-9]+\-([0-9]+)$/ |
358
|
21 |
4 |
$$dotpos ? : |
361
|
10 |
4 |
@sempar ? : |
|
11 |
14 |
$code ? : |
367
|
1 |
24 |
if ($$check eq 'ACCEPT') |
376
|
0 |
24 |
if ($$check eq 'ABORT') |
389
|
24 |
0 |
unless ($$check eq 'ERROR') |
417
|
0 |
0 |
unless ($$errstatus) |
421
|
0 |
0 |
unless $$errstatus |
435
|
0 |
0 |
if ($$errstatus == 3) |
437
|
0 |
0 |
if ($$token eq '') |
463
|
0 |
0 |
unless (@$stack) |