Branch Coverage

blib/lib/Cvs/Simple.pm
Criterion Covered Total %
branch 32 80 40.0


line true false branch
41 7 2 if (exists $args{'cvs_bin'}) { }
44 1 1 if (defined $ENV{'CVS_SIMPLE_BIN'}) { }
50 1 0 if (defined $m) { }
0 0 elsif (my $exe_path = which('cvs')) { }
54 1 0 if (defined $cvs_bin) { }
63 1 0 if (defined $ext)
74 0 9 if (exists $args{'external'}) { }
0 9 elsif (defined $ENV{'CVS_SIMPLE_EXTERNAL'}) { }
83 0 9 if (exists $args{'callback'})
95 0 4 unless defined $hook
97 0 4 unless (&Cvs::Simple::Hook::permitted($hook))
101 3 1 if (defined $func)
102 0 3 unless (reftype $func eq 'CODE')
108 4 0 if (exists $callback_of{ident $self}{$hook}) { }
120 0 0 unless (&Cvs::Simple::Hook::permitted($hook))
131 9 7 if (@_ == 1)
149 0 0 if ($cmd =~ /\bdiff\b/u) { }
150 0 0 if ($output =~ /unknown command/iu) { }
156 0 0 if ($result[0] == 0) { }
173 0 0 unless defined $cmd and $cmd
184 0 0 if (defined $hookfunc) { }
203 2 0 unless @args and scalar @args == 3
224 2 0 unless (@args and scalar @args == 3)
238 1 5 if (@_ == 1)
251 0 4 $self->external ? :
266 2 0 unless @args
270 0 0 if (@args)
284 2 0 unless @args
288 0 0 if (@args)
304 4 0 unless (@args and scalar @args == 2 || scalar @args == 1)
316 0 0 @args == 2 ? :
342 0 4 if (@args == 0) { }
2 2 elsif (@args == 2) { }
0 2 elsif (@args == 1) { }
345 2 0 unless reftype($args[1]) eq 'ARRAY'
353 0 0 if (reftype($args[0]) eq 'ARRAY') { }
385 2 0 unless @args and scalar @args == 1 || scalar @args == 3
390 0 0 @args == 3 ? :
406 0 0 if (@args)
428 0 0 @args ? :