| line |
true |
false |
branch |
|
82
|
0 |
1 |
if $self->have_queued_requests |
|
100
|
0 |
1 |
unless my $req = shift @{$$self{'queued_requests'};} |
|
114
|
0 |
1 |
@{$$self{'queued_requests'};} ? : |
|
127
|
0 |
0 |
if (@_) |
|
129
|
0 |
0 |
if $state eq $$self{'state'} |
|
147
|
0 |
0 |
if ($line =~ s/^(\$|\%|\*|\@)(\w+)\s*=\s*//) |
|
174
|
0 |
0 |
if ($line =~ s/^(\d+)((?:==>)|(?::))?//) |
|
200
|
2 |
0 |
if ($line =~ s/^([\w:]+)\(([^:]+):(\d+)\)://) { } |
|
|
0 |
0 |
elsif ($line =~ s/^(\d+)((?:==>)|(?::))?//) { } |
|
254
|
2 |
5 |
unless $line =~ /\w/ |
|
255
|
0 |
5 |
if ($line =~ /^Use /) { } |
|
|
3 |
2 |
elsif ($line =~ /^Loading DB routines/ or $line =~ /^Editor support/ or $line =~ /^Enter h/) { } |
|
268
|
1 |
0 |
if ($$buffref =~ s/^ DB<(\d+)> //) |
|
381
|
0 |
0 |
exists $args{'line'} ? : |
|
406
|
0 |
0 |
exists $args{'line'} ? : |
|
451
|
1 |
0 |
if $self->is_ready_for_request |