line |
true |
false |
branch |
32
|
4 |
11 |
if (defined $ARGV[0] and looks_like_addr($ARGV[0])) |
35
|
9 |
6 |
if (defined $ARGV[0] and &first(sub {
$_ eq $ARGV[0];
}
, MODES())) |
40
|
0 |
15 |
unless &GetOptions(\my %opts, 'addr|a=s', 'mode|m=s', 'timeout|t=i', 'debug|d', 'help|h', 'man') |
43
|
0 |
15 |
if @ARGV |
45
|
2 |
13 |
if (defined $opts{'man'}) |
48
|
3 |
12 |
if (defined $opts{'help'}) |
51
|
0 |
15 |
if (defined $opts{'debug'}) |
61
|
0 |
15 |
unless (&first(sub {
$_ eq $params{'mode'};
}
, MODES())) |
75
|
0 |
0 |
unless ($ret) |
90
|
0 |
0 |
if ($line =~ /^STAT items:(\d+):(\w+) (\d+)/) |
97
|
0 |
0 |
if ($line =~ /^STAT (\d+):(\w+) (\d+)/) |
106
|
0 |
0 |
unless $slab->{'total_pages'} |
110
|
0 |
0 |
$slab->{'chunk_size'} < 1024 ? : |
112
|
0 |
0 |
$slab->{'free_chunks_end'} == 0 ? : |
146
|
0 |
0 |
unless $line =~ /^STAT\s+(\S*)\s+(.*)/ |
148
|
0 |
0 |
if (length $key > $max_key_l) |
149
|
0 |
0 |
if (length $value > $max_val_l) |
167
|
0 |
0 |
if ($line =~ /^STAT items:(\d*):number (\d*)/) |
184
|
0 |
0 |
if ($line =~ /^ITEM (\S+) \[.* (\d+) s\]/) |
194
|
0 |
0 |
$expires{$d->{'key'}} < $now ? : |
209
|
0 |
0 |
if ($line =~ /^STAT\s+(\S*)\s+(.*)/) |