blib/lib/App/RedisTop/Redis.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 0 | 26 | 0.0 |
line | true | false | branch |
---|---|---|---|
16 | 0 | 0 | unless my $s = 'IO::Socket::INET'->new('PeerAddr', $server, 'Proto', 'tcp') |
22 | 0 | 0 | if ($pass) |
24 | 0 | 0 | unless <$s> |
40 | 0 | 0 | if $row =~ /^#/ |
41 | 0 | 0 | if $row =~ /^$/ |
70 | 0 | 0 | if $$header{'type'} eq 'itemlen' |
71 | 0 | 0 | if $$header{'type'} eq 'number' |
78 | 0 | 0 | if ($$row{'type'} eq 'line') |
79 | 0 | 0 | if (not $key) { } |
94 | 0 | 0 | if ($row =~ /^(\*|\$|\:)+(\w+)/) |
95 | 0 | 0 | if ($1 eq '*') { } |
0 | 0 | elsif ($1 eq '$') { } | |
0 | 0 | elsif ($1 eq ':') { } |