line |
true |
false |
branch |
48
|
0 |
0 |
if $ENV{'NET_MPD_DEBUG'} |
54
|
0 |
0 |
unless my $socket = 'IO::Socket::INET'->new('PeerHost', $$self{'hostname'}, 'PeerPort', $$self{'port'}, 'Proto', 'tcp') |
64
|
0 |
0 |
unless $version |
69
|
0 |
0 |
if ($$self{'password'}) |
71
|
0 |
0 |
if $result->is_error |
88
|
0 |
0 |
unless ($$self{'socket'}->connected) |
100
|
0 |
0 |
unless defined $line |
104
|
0 |
0 |
if ($line =~ /^OK$|^ACK /) { } |
115
|
0 |
0 |
if $version > $self->version |
145
|
0 |
0 |
if ($result->is_error) { } |
155
|
0 |
0 |
if ($options{'readonly'} or @_ == 1) { } |
194
|
0 |
0 |
if ($result->is_error) { } |
257
|
0 |
0 |
if ($result->is_error) { } |
345
|
0 |
0 |
if (@_) |
347
|
0 |
0 |
if $result->is_error |
351
|
0 |
0 |
if ($result->is_error) { } |
643
|
0 |
0 |
if (@_ > 4) { } |
644
|
0 |
0 |
if (defined $value) { } |
646
|
0 |
0 |
if $result->is_error |
650
|
0 |
0 |
if $result->is_error |
655
|
0 |
0 |
if $result->is_error |
673
|
0 |
0 |
if $result->is_error |
695
|
0 |
0 |
if $result->is_error |
702
|
0 |
0 |
if ($key eq 'file') { } |
|
0 |
0 |
elsif ($key eq 'sticker') { } |