| blib/lib/GD/Graph/colour.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 12 | 32 | 37.5 |
| line | true | false | branch |
|---|---|---|---|
| 100 | 1 | 3 | $_[0] ? : |
| 116 | 0 | 0 | $_[0] ? : |
| 138 | 0 | 2 | unless my $clr = shift() |
| 142 | 1 | 1 | unless exists $RGB{$clr} |
| 145 | 0 | 2 | unless (defined $rgb_ref) |
| 148 | 0 | 0 | unless ($warned_clrs{$clr}) |
| 195 | 1 | 1 | unless (defined $val) |
| 197 | 0 | 1 | unless my(@rgb) = hex2rgb($name) |
| 201 | 2 | 0 | if (ref $val and ref $val eq 'ARRAY') |
| 224 | 0 | 1 | unless @_ == 3 |
| 237 | 0 | 2 | unless @rgb |
| 276 | 0 | 0 | unless open RGB, $fn |
| 280 | 0 | 0 | if $line =~ /\s*!/ |
| 290 | 0 | 0 | unless defined $name |
| 305 | 0 | 0 | $_[0] ? : |
| 311 | 0 | 0 | if $n > $max |