| 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 ':') { } |