Branch Coverage

blib/lib/Graphics/ColorNames.pm
Criterion Covered Total %
branch 53 76 69.7


line true false branch
50 0 0 if (defined $hex) { }
63 8 6 unless (&is_loaded($module))
65 0 8 unless &is_loaded($module)
75 0 11 $scheme =~ /^Color::Library::Dictionary::/ ? :
0 11 $scheme =~ /^\+/ ? :
81 0 11 if ($@)
85 11 0 if ($module->can('NamesRgbTable')) { }
0 0 elsif ($module->can('_load_color_list')) { }
105 11 2 if (@_) { }
107 3 12 if (ref $scheme) { }
9 3 elsif ($scheme =~ /^\+?(?:\w+[:][:])*\w+$/) { }
1 2 elsif (file_name_is_absolute($scheme)) { }
134 1402 5532 if ($key =~ /^(?:\x23|0x)?([0-9a-f]{6})$/) { }
147 5524 8 if (defined $val) { }
169 23 7485 unless (defined $key)
179 16 3 if (ref $scheme eq 'HASH') { }
0 3 elsif (ref $scheme eq 'CODE') { }
0 3 elsif (ref $scheme eq 'ARRAY') { }
196 0 0 unless exists $s->{$name}
197 0 0 if ($key =~ /^(.+\:.+)\.([0-9]+)$/)
207 0 0 if (ref $scheme eq 'GLOB' or ref $scheme eq 'IO::File' or $scheme->isa('IO::File') or ref $scheme eq 'FileHandle' or $scheme->isa('FileHandle'))
216 0 3 if ($@) { }
0 3 elsif ($!) { }
235 3 7 if (-d $path)
239 3 6 if (-r 'File::Spec'->catdir($path, $fn) and $fn =~ /(.+)\.pm$/)
291 1 0 unless (%FoundSchemes)
307 1 3 unless (ref $file)
308 0 1 unless (-r $file)
314 3 1 ref $file ? :
315 1 3 unless (ref $file)
316 0 1 unless open $fh, $file
325 24 16 if ($line ne '')
329 0 24 unless $name ne ''
348 1 3 unless (ref $file)
357 3 12 unless defined $rgb
359 10 2 unless defined $prefix
367 12 3 defined $rgb ? :
368 7 8 wantarray ? :