| line |
true |
false |
branch |
|
269
|
2 |
768 |
unless ref $opts eq "HASH" |
|
272
|
748 |
20 |
if (ref $self eq '') { } |
|
274
|
739 |
9 |
$trailer ? : |
|
286
|
170 |
598 |
unless defined $self->{'_'}{'source'} |
|
287
|
2 |
740 |
ref $_[0] eq 'HASH' ? : |
|
|
742 |
26 |
if $trailer |
|
288
|
4 |
764 |
if $trailer |
|
290
|
92 |
676 |
unless exists $self->{'_'}{'fst'}{'START'} |
|
292
|
492 |
276 |
unless exists $self->{'_'}{'fst'}{'STOP'} |
|
497
|
239 |
195033 |
if $turn->[0] eq "STOP" |
|
498
|
137 |
194896 |
if $turn->[0] eq "BREAK" |
|
499
|
95814 |
99082 |
if $turn->[1] eq "SAME" |
|
500
|
89748 |
9334 |
if $turn->[1] eq "NEXT" |
|
501
|
18 |
9316 |
if $turn->[1] eq "TSTL" and defined $item |
|
502
|
9302 |
14 |
if $turn->[1] eq "TSTL" |
|
512
|
126 |
233 |
if $turn->[0] eq "BREAK" |
|
556
|
270 |
1486968 |
unless defined $entry |
|
558
|
66 |
1486901 |
unless ref $entry eq $test |
|
589
|
195983 |
1 |
do {
1 == @_
} ? : |
|
|
195984 |
1409563 |
@_ ? : |
|
656
|
3 |
1 |
do {
3 == @_
} ? : |
|
|
67026 |
4 |
do {
2 == @_
} ? : |
|
|
195387 |
67030 |
do {
1 == @_
} ? : |
|
|
91 |
262418 |
do {
not exists $self->{'_'}{'fst'}{$_[0]}
} ? : |
|
|
2 |
262509 |
do {
ref $_[1] eq 'HASH' if 2 == @_
} ? : |
|
|
262511 |
1 |
@_ ? : |
|
659
|
67036 |
195475 |
if 2 == @_ |
|
661
|
0 |
2 |
$backup ? : |
|
675
|
2 |
1 |
$backup ? : |
|
773
|
196102 |
0 |
do {
2 == @_
} ? : |
|
|
196506 |
196102 |
do {
1 == @_
} ? : |
|
|
1 |
392608 |
do {
not exists $self->{'_'}{'fst'}{$_[0]} if 1 == @_
} ? : |
|
|
392609 |
1 |
@_ ? : |
|
775
|
196507 |
196102 |
if 1 == @_ |
|
783
|
371 |
196130 |
if $state eq "STOP" or $state eq "BREAK" |
|
784
|
167848 |
28282 |
if exists $entry->{'tturn'} or exists $entry->{'fturn'} |
|
785
|
12167 |
16115 |
unless (exists $entry->{'turns'}) |
|
795
|
180046 |
16055 |
if (exists $special_turns{$turn}) { } |
|
|
16055 |
0 |
elsif (not index($turn, 'turn%')) { } |
|
805
|
80249 |
115667 |
if $state eq "START" or $state eq "CONTINUE" |
|
839
|
195855 |
1 |
do {
1 == @_
} ? : |
|
|
195856 |
196979 |
@_ ? : |
|
895
|
34 |
461692 |
unless defined $topic |
|
898
|
461643 |
48 |
if ref $topic eq "CODE" |
|
899
|
8 |
40 |
unless ref $topic eq "" |
|
902
|
4 |
36 |
unless defined $self->{'_'}{'namespace'} |
|
906
|
12 |
24 |
if (ref $anchor eq "" and $anchor eq "") |
|
910
|
12 |
24 |
if (ref $anchor eq '') { } |
|
914
|
8 |
16 |
unless $topic |
|
921
|
4 |
8 |
unless $topic |
|
1005
|
67028 |
129508 |
if not @_ or defined $_[0] |
|
1010
|
21035 |
17408 |
$turn[0] ? : |
|
|
16184 |
38443 |
$kind ? : |
|
|
12345 |
54627 |
!defined($turn[0]) ? : |
|
|
129507 |
66972 |
@_ && !defined($_[0]) ? : |
|
1018
|
195406 |
1073 |
@_ ? : |
|
1111
|
1541669 |
444 |
unless $self->{'_'}{'diag_level'} >= shift @_ |
|
1131
|
7 |
13022 |
unless $self->{'_'}{'diag_level'} >= 1 |