Condition Coverage

blib/lib/WebDyne/Base.pm
Criterion Covered Total %
condition 2 47 4.2


and 2 conditions

line l !l condition
215 0 0 $Err[$#Err][0] && (return undef)
356 0 0 $Err[$#Err][0] && (return undef)

and 3 conditions

line !l l&&!r l&&r condition
80 0 8 0 not ref(my $fn = ${"${caller}::DEBUG";}) and ${"${caller}::DEBUG";}
107 0 0 0 $fn and $package ? $package eq $caller : 1
147 0 0 0 $ENV{'WEBDYNE_DEBUG'} and $ENV{'WEBDYNE_DEBUG'} ne '1'
244 0 0 0 @Err && $Err[0][0]

or 2 conditions

line l !l condition
70 8 0 (caller 0)[0] || (return undef)
108 0 0 $mode ||= 1089
145 0 0 (caller 1)[3] || 'main'
438 0 0 $$err_ar[$i + 1][3] || $err_ar->[$i][0] || (last)
439 0 0 $err_ar->[$i][2] || (next)

or 3 conditions

line l !l&&r !l&&!r condition
85 0 0 0 'IO::File'->new($fn, 1089) || do { warn "unable to open file '${fn}', $!"; undef }
106 0 0 0 $fn ||= $debug_hr->{'file'}
111 0 0 0 'IO::File'->new($fn, $mode) || do { warn "unable to open file '${fn}', $!"; undef }
0 0 0 $Package{'debug_fh'}{$fn} ||= 'IO::File'->new($fn, $mode) || do { warn "unable to open file '${fn}', $!"; undef }
128 0 0 0 'IO::File'->new($fn, 1089) || do { warn "unable to open file '${fn}', $!"; undef }
0 0 0 $Package{'debug_fh'}{$fn} ||= 'IO::File'->new($fn, 1089) || do { warn "unable to open file '${fn}', $!"; undef }
150 0 0 0 $caller eq $debug_target or $method =~ /\Q$debug_target\E$/