Branch Coverage

blib/lib/App/Memcached/Tool/CLI.pm
Criterion Covered Total %
branch 12 38 31.5


line true false branch
34 5 10 if (defined $ARGV[0] and looks_like_addr($ARGV[0]))
37 8 7 if (defined $ARGV[0] and &first(sub { $_ eq $ARGV[0]; } , @MODES))
42 0 15 unless &GetOptions(\my %opts, 'addr|a=s', 'mode|m=s', 'timeout|t=i', 'debug|d', 'help|h', 'man')
45 0 15 if @ARGV
47 2 13 if (defined $opts{'man'})
50 3 12 if (defined $opts{'help'})
53 0 15 if (defined $opts{'debug'})
63 0 15 unless (&first(sub { $_ eq $params{'mode'}; } , @MODES))
77 0 0 unless ($ret)
92 0 0 if ($line =~ /^STAT items:(\d+):(\w+) (\d+)/)
99 0 0 if ($line =~ /^STAT (\d+):(\w+) (\d+)/)
108 0 0 unless $slab->{'total_pages'}
112 0 0 $slab->{'chunk_size'} < 1024 ? :
114 0 0 $slab->{'free_chunks_end'} == 0 ? :
131 0 0 if ($line =~ /^STAT\s+(\S*)\s+(.*)/)
148 0 0 if ($line =~ /^STAT\s+(\S*)\s+(.*)/)
167 0 0 if ($line =~ /^STAT items:(\d*):number (\d*)/)
184 0 0 if ($line =~ /^ITEM (\S+) \[.* (\d+) s\]/)
203 0 0 if ($line =~ /^STAT\s+(\S*)\s+(.*)/)