line |
true |
false |
branch |
60
|
0 |
0 |
unless $settings{'port'} |
62
|
0 |
0 |
unless my $sock = 'IO::Socket::INET'->new('PeerAddr', $settings{'host'}, 'PeerPort', $settings{'port'}, 'Proto', 'tcp') |
68
|
0 |
0 |
if ($intro =~ /munin node at (.+)$/) { } |
91
|
0 |
0 |
if (defined $data) { } |
102
|
0 |
0 |
$, ? : |
123
|
0 |
0 |
if $#data < 0 |
150
|
0 |
0 |
if wantarray |
169
|
0 |
0 |
$node ? : |
173
|
0 |
0 |
if wantarray |
191
|
0 |
0 |
if ($_ =~ /^([A-Za-z0-9_-]+)\s+(.+)$/) { } |
|
0 |
0 |
elsif ($_ =~ /^([A-Za-z0-9_-]+)\.([A-Za-z]+)\s+(.+)$/) { } |
197
|
0 |
0 |
if (wantarray) { } |
217
|
0 |
0 |
if ($_ =~ /^([A-Za-z0-9_-]+)\.value\s+(.+)$/) |
222
|
0 |
0 |
if wantarray |