Branch Coverage

blib/lib/App/Pod/Example.pm
Criterion Covered Total %
branch 18 18 100.0


line true false branch
51 1 15 if (not &getopts("d:ehn:prs:", $self->{'_opts'}) or @ARGV < 1 or $self->{'_opts'}{'h'})
78 1 11 unless ($self->{'_print'} or $self->{'_run'})
86 1 13 unless (defined $code)
92 3 10 if ($self->{'_print'})
93 1 2 if ($self->{'_debug'})
96 1 2 if ($self->{'_enumerate'}) { }
109 10 3 if ($self->{'_run'})
110 9 1 if ($self->{'_debug'})
116 1 9 if (@{$self->{'_args'};})