| blib/lib/Color/Rgb.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 18 | 28 | 64.2 |
| line | true | false | branch |
|---|---|---|---|
| 44 | 0 | 1 | unless (sysopen RGB, $$self{'rgb_txt'}, 0) |
| 48 | 0 | 1 | unless (flock RGB, 1) |
| 53 | 1 | 752 | if /^(\n|!|\#)/ |
| 59 | 0 | 1 | unless close RGB |
| 78 | 0 | 7 | unless ($name) |
| 84 | 0 | 7 | unless (defined $rgb) |
| 90 | 3 | 4 | if defined $delim |
| 109 | 0 | 3 | unless ($name) |
| 114 | 0 | 3 | unless my($r, $g, $b) = $self->rgb(lc $name) |
| 134 | 0 | 1 | unless ($hex) |
| 149 | 1 | 0 | if defined $delim |
| 162 | 0 | 4 | unless (defined $b) |
| 180 | 752 | 752 | if (defined $pat) |
| 181 | 114 | 638 | if $name =~ /$pat/ |