Branch Coverage

inc/Spiffy.pm
Criterion Covered Total %
branch 49 202 24.2


line true false branch
21 0 0 $_[1] eq 'import' && (caller())->isa('autouse') ? :
66 0 15 if $$args{-'mixin'}
69 0 15 if $$args{-'filter_dump'}
70 0 15 if $$args{-'filter_save'}
71 0 15 if $$args{-'yaml'}
72 0 15 if $$args{-'dumper'}
76 0 15 if ($$args{-'XXX'})
77 0 0 unless grep /^XXX$/, @EXPORT_BASE
82 5 10 if $$args{-'selfless'} || $$args{-'Base'} and not $$filtered_files{(caller $stack_frame)[1]}++
86 5 10 if $$args{-'Base'} or $$args{-'base'}
90 0 20 unless $class->isa('Spiffy')
95 5 15 $$args{-'Base'} || $$args{-'base'} ? :
104 0 20 unless keys %exportable
112 0 5 unless $exportable{$v}
125 0 5 if $done
128 0 3370 if $status < 0
129 5 3365 if (/^__(?:END|DATA)__\r?$/)
145 0 5 if (@my_subs)
150 0 5 if ($filter_dump)
151 0 5 if ($filter_save)
165 10 10 if defined $$bases_map{$class}
210 0 85 if defined $$args{-'package'}
211 0 85 if defined $default and $$args{-'weak'}
213 0 85 if defined &{"${package}::$field";}
214 0 85 if $$args{-'weak'}
215 10 70 ref $default eq 'HASH' && !keys(%$default) ? :
5 80 ref $default eq 'ARRAY' && !@$default ? :
223 20 65 if ($$args{-'init'})
224 0 20 $$args{-'weak'} ? :
227 40 45 if defined $default
231 0 85 if $$args{-'weak'}
235 0 0 unless exists $_[0]{'_filters_delay'}
0 0 unless $#_ > 0
0 0 unless $#_ > 0 or defined $_[0]{'data_delim'}
0 0 unless $#_ > 0
0 0 unless $#_ > 0 or defined $_[0]{'block_list'}
0 0 unless $#_ > 0
0 0 unless exists $_[0]{'block_delim_default'}
0 0 unless $#_ > 0
0 0 unless $#_ > 0 or defined $_[0]{'spec'}
0 0 unless $#_ > 0
0 0 unless exists $_[0]{'original_values'}
0 0 unless $#_ > 0
0 0 unless $#_ > 0
0 0 unless $#_ > 0
0 0 unless $#_ > 0
0 0 unless $#_ > 0
0 0 unless exists $_[0]{'_next_list'}
0 0 unless $#_ > 0
0 0 unless $#_ > 0
0 0 unless exists $_[0]{'_filters_map'}
0 0 unless $#_ > 0
0 0 unless exists $_[0]{'_filters'}
0 0 unless $#_ > 0
0 0 unless exists $_[0]{'data_delim_default'}
0 0 unless $#_ > 0
0 0 unless $#_ > 0 or defined $_[0]{'block_delim'}
0 0 unless $#_ > 0
0 0 unless exists $_[0]{'_no_diag_on_only'}
0 0 unless $#_ > 0
236 0 85 if $@
239 0 85 if defined wantarray
259 0 0 if defined $$args{-'package'}
261 0 0 if defined &{"${package}::$field";}
273 0 0 if defined $$args{-'package'}
275 0 0 if defined &{"${package}::$field";}
291 5 150 if (defined $elem and defined $booleans{$elem}) { }
20 130 elsif (defined $elem and defined $pairs{$elem} and @_) { }
292 0 5 @_ && $_[0] =~ /^[01]$/ ? :
303 100 0 wantarray ? :
311 0 0 unless (ref $_[0])
312 0 0 unless defined $_[0]
313 0 0 unless (\$_[0]) =~ /\((\w+)\)$/o
317 0 0 unless overload::StrVal($_[0]) =~ /\((\w+)\)$/o
328 0 0 @_ ? :
338 0 0 if $method =~ s/.*:://
341 0 0 @_ ? :
342 0 0 ref $_[0] ? :
345 0 0 $seen || ($seen = $_ eq $caller_class) ? :
350 0 0 if $super_class eq $class
351 0 0 if (defined &{"${super_class}::$method";})
352 0 0 if $method eq 'AUTOLOAD'
369 0 5 unless defined $INC{'base.pm'}
393 0 17 unless %{"${_}::";}
17 0 unless grep {eval "require $_" unless %{"${_}::";}; $_->isa('Spiffy');} @base_classes
398 0 0 if $inheritor->isa($base_class)
399 0 0 unless $base_class->isa('Spiffy')
416 0 0 if $target_class eq 'mixin'
418 0 0 unless my $mixin_class = shift()
438 0 0 @_ ? :
440 0 0 $methods{$_} ? :
456 0 0 /^:(.*)/ ? :
0 0 /^!:(.*)/ ? :
463 0 0 if (@roles and $roles[0] =~ /^!/)
470 0 0 if /^!(.*)/
480 0 0 if $class eq 'Spiffy'
484 0 0 if defined &{"${class}::$_";}
488 0 0 if @{"${class}::ISA";}
499 0 0 if ($dump eq 'dumper')
517 0 0 wantarray ? :
526 0 0 wantarray ? :