Branch Coverage

lib/Su/Model.pm
Criterion Covered Total %
branch 48 60 80.0


line true false branch
68 0 19 if $base
69 0 19 if $dir
71 0 19 if ($base or $dir) { }
94 10 0 if ref $_[0] eq 'Su::Model' or $_[0] eq 'Su::Model'
97 2 8 if (not defined $key) { }
4 4 elsif (defined $value) { }
170 8 3 if ref $_[0] eq 'Su::Model'
171 8 3 $$self{'logger'} ? :
175 8 3 $$self{'base'} ? :
176 5 6 $$self{'dir'} ? :
188 6 5 if (scalar @arr > 1)
193 6 5 if ($comp_id =~ m[::|/]) { }
200 2 9 unless -d $dir
204 0 11 unless (-d $dir)
213 6 5 if ($comp_id =~ m[::|/]) { }
220 0 11 unless open my $file, '>', $fpath
224 5 6 unless ($comp_id =~ /::/)
236 11 0 if ($ret == 1) { }
284 48 6 if ref $_[0] eq 'Su::Model'
288 52 2 $self ? :
291 2 52 if $$MODEL_CACHE_HREF{$model_id} and $$opt_href{'share'}
296 15 37 $$self{'base'} ? :
297 47 5 $$self{'dir'} ? :
309 5 47 if ($@)
310 4 1 if ($$opt_href{'suppress_error'}) { }
320 0 47 if (exists &{$model_id . '::new';}) { }
324 47 0 $model_id->can('model') ? :
327 0 47 unless $model_href
332 0 47 if ($$opt_href{'share'}) { }
350 0 11 if ref $_[0] eq 'Su::Model'