Branch Coverage

lib/Graphics/Toolkit/Color.pm
Criterion Covered Total %
branch 114 134 85.0


line true false branch
33 2 4 if @args == 2 and $first_arg_is_color_space and ref $args[1] eq "ARRAY"
34 7 79 if @args == 3 or @args > 3 and $first_arg_is_color_space
35 16 70 if @args == 6 or @args == 8
36 9 77 unless @args == 1
38 49 28 ref $self ? :
42 18 117 if ref $color_def eq __PACKAGE__
47 47 238 unless ref $value_obj eq "Graphics::Toolkit::Color::Values"
53 0 0 unless $_[0]{'name'}
77 0 34 if @$raw_args == 1 and ref $raw_args->[0] eq "HASH" and not defined $only_parameter && $only_parameter eq 'to' && ref _new_from_scalar_def($raw_args)
80 33 1 if (@$raw_args == 1 and defined $only_parameter and $only_parameter)
81 0 33 if @$required_parameter > 1
82 0 33 if @$required_parameter and $required_parameter->[0] ne $only_parameter
90 2 123 if (@$raw_args % 2)
91 0 2 defined $only_parameter && $only_parameter ? :
97 10 20 if (ref $parameter_alias eq "HASH" and exists $parameter_alias->{$parameter_name} and exists $arg_hash{$parameter_alias->{$parameter_name}})
101 6 61 unless exists $arg_hash{$parameter_name}
105 0 13 if (ref $parameter_alias eq "HASH" and exists $parameter_alias->{$parameter_name} and exists $arg_hash{$parameter_alias->{$parameter_name}})
111 99 283 exists $arg_hash{$parameter_name} ? :
113 7 110 if %arg_hash
133 1 55 unless ref $arg
139 32 2 unless @args
168 6 5 wantarray ? :
183 2 7 unless ref $arg
185 0 7 unless ref $target_color
187 0 7 unless ref $color_space
188 3 4 if (defined $arg->{'select'})
189 2 1 if (not ref $arg->{'select'}) { }
1 0 elsif (ref $arg->{'select'} eq 'ARRAY') { }
191 0 2 unless $color_space->is_axis_name($arg->{'select'})
194 0 2 unless $color_space->is_axis_name($axis_name)
201 0 7 unless ref $range_def
209 0 10 if @args == 1 and ref $args[0] eq "HASH"
217 1 9 if @args % 2 or not @args or @args > 10
221 0 9 unless ref $color_space
227 0 10 if @args == 1 and ref $args[0] eq "HASH"
235 1 9 if @args % 2 or not @args or @args > 10
239 0 9 unless ref $color_space
255 2 21 unless ref $arg
257 11 10 if (ref $recipe) { }
259 1 10 if ref $arg->{'amount'}
260 10 0 if defined $arg->{'amount'}
262 2 8 if (ref $arg->{'to'} ne 'ARRAY') { }
268 0 13 unless ref $color
272 1 7 if ref $arg->{'to'} eq "ARRAY" and ref $arg->{'amount'} eq "ARRAY" and @{$arg->{'amount'};} != @{$arg->{'to'};}
273 5 2 if ref $arg->{'to'} and not ref $arg->{'amount'}
278 1 16 unless ref $color_space
290 1 12 unless ref $arg
292 1 11 unless ref $color_space
307 1 11 unless ref $arg
308 2 9 unless is_nr($arg->{'steps'})
309 0 9 unless $arg->{'steps'}
310 1 8 unless is_nr($arg->{'tilt'})
311 1 7 if ref $arg->{'target'} ne "HASH"
313 2 5 if (keys %{$$arg{'target'};}) { }
315 1 1 unless ref $target_values
333 2 12 unless ref $arg
336 9 3 if (ref $target_color) { }
339 1 2 if ref $arg->{'to'} ne "ARRAY" or not @{$arg->{'to'};}
342 1 4 unless ref $target_color
347 1 9 unless is_nr($arg->{'steps'}) and $arg->{'steps'} > 0
349 1 8 unless is_nr($arg->{'tilt'})
351 1 7 unless ref $color_space
369 6 12 unless ref $arg
371 1 11 unless ref $color_space
373 3 8 unless is_nr($arg->{'radius'}) or $color_space->is_number_tuple($arg->{'radius'})
375 2 6 unless is_nr($arg->{'minimal_distance'}) and $arg->{'minimal_distance'} > 0
377 1 5 if $color_space->axis_count > 3 and not ref $arg->{'radius'}