Condition Coverage

blib/script/greple
Criterion Covered Total %
condition 67 157 42.6


and 2 conditions

line l !l condition
186 0 12920 /^(\w+)/u and $optargs{$1} = $b

and 3 conditions

line !l l&&!r l&&r condition
194 0 0 0 ref $var eq "HASH" and @_ == 1
430 1 169 0 @ARGV and $ARGV[0] eq "--norc"
170 0 0 @ARGV and $ARGV[0] eq "--norc" and shift @ARGV
582 154 15 1 defined $opt_parallel and $opt_parallel == 0
730 0 0 0 @opt_chdir == 1 and @argv_files == 1
0 0 0 @opt_chdir == 1 and @argv_files == 1 and @opt_glob == 0
740 161 0 5 @ARGV > 1 || $opt_readlist and not $opt_h
988 0 0 0 usage() and exit
1066 164 0 0 $opt_d{'n'} and $opt_d{'f'}
1108 160 0 0 $opt_uniqcolor and $opt_d{'c'}
1214 167 160 0 @ARGV == 0 and @opt_chdir
327 0 0 @ARGV == 0 and @opt_chdir and @argv_files || @opt_glob
1223 160 0 0 $opt_readlist && read_stdin()
1363 8 101 18 !$opt_all && $blockend ne '' && ($opt_blockend || $opt_p || $opt_A || $opt_B || @opt_block)
1411 255 6 2 $opt_n and $opt_linestyle eq "separate"
1415 263 0 0 $opt_b and $opt_blockstyle eq "separate"
1454 1 0 0 $opt_n and $opt_linestyle eq "line"
1488 263 0 0 $opt_b and $opt_blockstyle eq "line"
1498 136 127 0 $is_top and $_top ne ""
1500 0 209 54 $opt_newline and not $block =~ /\n\z/u

or 2 conditions

line l !l condition
472 0 0 $offset || 0
474 1 0 $offset || 0
515 0 0 $ENV{'PAGER'} || 'less'
562 0 6 $opt_exit //= 0
570 1 0 do { if ($^O =~ /darwin|bsd/iu) { `sysctl -n hw.ncpu 2>/dev/null`; } elsif (-r "/proc/cpuinfo") { open my $fh, "<", "/proc/cpuinfo"; scalar grep({/^processor\s*:/u;} readline $fh); } else { $ENV{'NUMBER_OF_PROCESSORS'}; } } // ""
649 167 0 $must // 0
795 0 0 $+{'mk'} // ""
945 0 18 /^&\w+/u or next
1195 0 0 $bucket->help($name) // ""
1379 257 6 $block_number //= 0

or 3 conditions

line l !l&&r !l&&!r condition
430 0 0 170 @ARGV and $ARGV[0] eq "--norc" and shift @ARGV or $ENV{'GREPLE_NORC'}
486 0 170 0 $opt_ocode || $default_ocode
497 0 0 170 $opt_man or $opt_show
0 0 170 $opt_man or $opt_show or $opt_path
603 6 126 29 $opt_filter or grep {not $_->[0] =~ /^(not|may)/u;} @opt_pattern
604 28 0 1 shift @ARGV // &usage
698 7 10 34 $max <= 0 or $_[0] <= $max
723 4 0 162 $opt_H || $opt_l
730 0 0 0 $opt_h or @opt_chdir == 1 and @argv_files == 1 and @opt_glob == 0
739 165 0 1 @ARGV or @argv_files
165 0 1 @ARGV or @argv_files or @opt_glob
0 0 1 @ARGV or @argv_files or @opt_glob or $opt_readlist
740 5 0 161 @ARGV > 1 || $opt_readlist
809 1 0 165 $opt_color eq 'always' || $opt_color eq 'auto' && (!$opt_o && -t STDOUT)
818 0 0 0 $_esc{$1} // $1
866 0 0 166 $color_index{'A'} or $color_index{'D'}
907 0 4 0 $opt_A ||= $opt_C
908 0 4 0 $opt_B ||= $opt_C
973 0 0 0 $pat->regex // $pat->string
1138 8 34 118 $opt_exit // $stat{'match_effective'} == 0
1198 0 0 0 $help || join(' ', shellquote(@option))
1214 0 0 0 @argv_files || @opt_glob
1223 167 0 160 defined($file = shift @ARGV) or defined($file = $opt_readlist && read_stdin())
1230 0 0 0 open STDIN, "-|" or exec "w3m -dump $file"
1437 3 0 0 do { if (ref $callback eq "CODE") { &$callback($start, $end, $pi, $b); } elsif (callable($callback)) { $callback->call(&FILELABEL, $file, "start", $start, "end", $end, "index", $pi, "match", $b); } else { die; } } // $b