| line |
true |
false |
branch |
|
268
|
2 |
768 |
unless ref $opts eq "HASH" |
|
271
|
748 |
20 |
if (ref $self eq '') { } |
|
273
|
739 |
9 |
$trailer ? : |
|
285
|
170 |
598 |
unless defined $self->{'_'}{'source'} |
|
286
|
2 |
740 |
ref $_[0] eq 'HASH' ? : |
|
|
742 |
26 |
if $trailer |
|
287
|
4 |
764 |
if $trailer |
|
289
|
92 |
676 |
unless exists $self->{'_'}{'fst'}{'START'} |
|
291
|
492 |
276 |
unless exists $self->{'_'}{'fst'}{'STOP'} |
|
496
|
239 |
177718 |
if $turn->[0] eq "STOP" |
|
497
|
137 |
177581 |
if $turn->[0] eq "BREAK" |
|
498
|
90204 |
87377 |
if $turn->[1] eq "SAME" |
|
499
|
80017 |
7360 |
if $turn->[1] eq "NEXT" |
|
500
|
18 |
7342 |
if $turn->[1] eq "TSTL" and defined $item |
|
501
|
7328 |
14 |
if $turn->[1] eq "TSTL" |
|
511
|
126 |
233 |
if $turn->[0] eq "BREAK" |
|
555
|
270 |
1352010 |
unless defined $entry |
|
557
|
66 |
1351943 |
unless ref $entry eq $test |
|
588
|
178669 |
1 |
do {
1 == @_
} ? : |
|
|
178670 |
1277260 |
@_ ? : |
|
655
|
3 |
1 |
do {
3 == @_
} ? : |
|
|
58674 |
4 |
do {
2 == @_
} ? : |
|
|
178070 |
58678 |
do {
1 == @_
} ? : |
|
|
91 |
236749 |
do {
not exists $self->{'_'}{'fst'}{$_[0]}
} ? : |
|
|
2 |
236840 |
do {
ref $_[1] eq 'HASH' if 2 == @_
} ? : |
|
|
236842 |
1 |
@_ ? : |
|
658
|
58683 |
178159 |
if 2 == @_ |
|
660
|
0 |
2 |
$backup ? : |
|
674
|
2 |
1 |
$backup ? : |
|
772
|
178787 |
0 |
do {
2 == @_
} ? : |
|
|
179190 |
178787 |
do {
1 == @_
} ? : |
|
|
1 |
357977 |
do {
not exists $self->{'_'}{'fst'}{$_[0]} if 1 == @_
} ? : |
|
|
357978 |
1 |
@_ ? : |
|
774
|
179191 |
178787 |
if 1 == @_ |
|
782
|
371 |
178814 |
if $state eq "STOP" or $state eq "BREAK" |
|
783
|
154580 |
24234 |
if exists $entry->{'tturn'} or exists $entry->{'fturn'} |
|
784
|
10163 |
14071 |
unless (exists $entry->{'turns'}) |
|
794
|
164774 |
14011 |
if (exists $special_turns{$turn}) { } |
|
|
14011 |
0 |
elsif (not index($turn, 'turn%')) { } |
|
804
|
71997 |
106605 |
if $state eq "START" or $state eq "CONTINUE" |
|
838
|
178541 |
1 |
do {
1 == @_
} ? : |
|
|
178542 |
179664 |
@_ ? : |
|
894
|
34 |
412616 |
unless defined $topic |
|
897
|
412567 |
48 |
if ref $topic eq "CODE" |
|
898
|
8 |
40 |
unless ref $topic eq "" |
|
901
|
4 |
36 |
unless defined $self->{'_'}{'namespace'} |
|
905
|
12 |
24 |
if (ref $anchor eq "" and $anchor eq "") |
|
909
|
12 |
24 |
if (ref $anchor eq '') { } |
|
913
|
8 |
16 |
unless $topic |
|
920
|
4 |
8 |
unless $topic |
|
1004
|
58675 |
120544 |
if not @_ or defined $_[0] |
|
1009
|
18936 |
15204 |
$turn[0] ? : |
|
|
14140 |
34140 |
$kind ? : |
|
|
10342 |
48280 |
!defined($turn[0]) ? : |
|
|
120542 |
58622 |
@_ && !defined($_[0]) ? : |
|
1017
|
178091 |
1073 |
@_ ? : |
|
1110
|
1394311 |
444 |
unless $self->{'_'}{'diag_level'} >= shift @_ |
|
1130
|
7 |
11018 |
unless $self->{'_'}{'diag_level'} >= 1 |