Branch Coverage

blib/lib/App/pwhich.pm
Criterion Covered Total %
branch 11 20 55.0


line true false branch
20 2 1 if ($prog eq 'which') { }
22 0 2 unless &getopts('avs', \%opts)
23 0 2 if $opts{'v'}
24 0 2 unless @ARGV
34 0 3 if ($^O eq 'MSWin32' and eval { do { require Shell::Guess; 1 } })
39 3 0 $opts{'a'} ? :
43 0 3 unless defined $result[0]
44 2 1 unless ($opts{'s'})
49 0 3 unless (@result)
51 0 0 unless $opts{'s'}