line |
l |
!l |
condition |
154
|
0 |
0 |
$packet_len // 'undef' |
178
|
0 |
0 |
$bytes // 'undef' |
194
|
0 |
0 |
$bytes // 'undef' |
208
|
0 |
0 |
$packet_len // 'undef' |
214
|
0 |
0 |
$packet_len // 'undef' |
335
|
0 |
0 |
$id // '-' |
339
|
0 |
0 |
$self->command_name($cmd) || 'unknown' |
360
|
0 |
0 |
$status_messages[$status] // 'failure' |
361
|
0 |
0 |
$lang //= 'en' |
402
|
0 |
0 |
$id // '-' |
421
|
0 |
0 |
$cmd //= 'undef' |
422
|
0 |
0 |
$id //= 'id' |
437
|
0 |
0 |
$self->command_name($cmd) // '-' |
|
0 |
0 |
$_[0] // '-' |
444
|
0 |
0 |
$self->command_name($cmd) || 'unknown' |
454
|
0 |
0 |
buf_shift_uint32($_[3]) // (goto BAD_PACKET) |
457
|
0 |
0 |
buf_shift_str($_[3]) // (goto BAD_PACKET) |
|
0 |
0 |
buf_shift_str($_[3]) // (goto BAD_PACKET) |
497
|
0 |
0 |
buf_shift_utf8($_[3]) // (goto BAD_PACKET) |
|
0 |
0 |
0 |
buf_shift_str($_[3]) // (goto BAD_PACKET) |
|
0 |
0 |
0 |
buf_shift_str($_[3]) // (goto BAD_PACKET) |
|
0 |
0 |
buf_shift_utf8($_[3]) // (goto BAD_PACKET) |
|
0 |
0 |
0 |
buf_shift_uint32($_[3]) // (goto BAD_PACKET) |
|
0 |
0 |
buf_shift_attrs($_[3]) // (goto BAD_PACKET) |
|
0 |
0 |
buf_shift_str($_[3]) // (goto BAD_PACKET) |
|
0 |
0 |
0 |
buf_shift_uint64($_[3]) // (goto BAD_PACKET) |
|
0 |
0 |
buf_shift_str($_[3]) // (goto BAD_PACKET) |
|
0 |
0 |
buf_shift_utf8($_[3]) // (goto BAD_PACKET) |
|
0 |
0 |
buf_shift_utf8($_[3]) // (goto BAD_PACKET) |
|
0 |
0 |
buf_shift_attrs($_[3]) // (goto BAD_PACKET) |
|
0 |
0 |
0 |
buf_shift_str($_[3]) // (goto BAD_PACKET) |
|
0 |
0 |
buf_shift_attrs($_[3]) // (goto BAD_PACKET) |
|
0 |
0 |
0 |
buf_shift_utf8($_[3]) // (goto BAD_PACKET) |
|
0 |
0 |
buf_shift_utf8($_[3]) // (goto BAD_PACKET) |
|
0 |
0 |
buf_shift_utf8($_[3]) // (goto BAD_PACKET) |
|
0 |
0 |
buf_shift_utf8($_[3]) // (goto BAD_PACKET) |
|
0 |
0 |
buf_shift_utf8($_[3]) // (goto BAD_PACKET) |
|
0 |
0 |
0 |
buf_shift_attrs($_[3]) // (goto BAD_PACKET) |
|
0 |
0 |
0 |
buf_shift_utf8($_[3]) // (goto BAD_PACKET) |
|
0 |
0 |
0 |
buf_shift_str($_[3]) // (goto BAD_PACKET) |
|
0 |
0 |
buf_shift_uint64($_[3]) // (goto BAD_PACKET) |
|
0 |
0 |
0 |
buf_shift_uint32($_[3]) // (goto BAD_PACKET) |
|
0 |
0 |
buf_shift_utf8($_[3]) // (goto BAD_PACKET) |
|
0 |
0 |
buf_shift_utf8($_[3]) // (goto BAD_PACKET) |
|
0 |
0 |
buf_shift_utf8($_[3]) // (goto BAD_PACKET) |
|
0 |
0 |
0 |
buf_shift_utf8($_[3]) // (goto BAD_PACKET) |
|
0 |
0 |
buf_shift_utf8($_[3]) // (goto BAD_PACKET) |
|
0 |
0 |
buf_shift_str($_[3]) // (goto BAD_PACKET) |
line |
l |
!l&&r |
!l&&!r |
condition |
72
|
0 |
0 |
0 |
$fh ||= do {
no strict 'refs';
\*{uc "STD$name";}
} |
160
|
0 |
0 |
0 |
$wait_for_packet or length $$out_b |
338
|
0 |
0 |
0 |
$$self{'_packet_handler_cache'}[$cmd] ||= do {
my $name = $self->command_name($cmd) || 'unknown';
$self->can('unsupported_command') unless $self->can("handle_packet_${name}_v$$self{'protocol_version'}") or $self->can("handle_packet_$name")
} |
340
|
0 |
0 |
0 |
$self->can("handle_packet_${name}_v$$self{'protocol_version'}") or $self->can("handle_packet_$name") |
360
|
0 |
0 |
0 |
$msg //= $status_messages[$status] // 'failure' |
401
|
0 |
0 |
0 |
uc $self->command_name($cmd) || $cmd |
443
|
0 |
0 |
0 |
$$self{'_command_handler_cache'}[$cmd] ||= do {
my $name = $self->command_name($cmd) || 'unknown';
sub {
(shift())->unsupported_command($cmd, $_[0]);
}
unless $self->can("handle_command_${name}_v$$self{'protocol_version'}") or $self->can("handle_command_$name")
} |
447
|
0 |
0 |
0 |
$self->can("handle_command_${name}_v$$self{'protocol_version'}") or $self->can("handle_command_$name") |