File Coverage

blib/lib/Graphics/ColorNames/HTML.pm
Criterion Covered Total %
statement 12 12 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod 0 1 0.0
total 17 18 94.4


line stmt bran cond sub pod time code
1             package Graphics::ColorNames::HTML;
2              
3 1     1   167796 use v5.6;
  1         5  
4              
5             # ABSTRACT: HTML color names and equivalent RGB values
6              
7             # RECOMMEND PREREQ: Graphics::ColorNames
8              
9              
10 1     1   5 use strict;
  1         2  
  1         18  
11 1     1   3 use warnings;
  1         2  
  1         40  
12              
13             our $VERSION = 'v3.3.1';
14              
15             sub NamesRgbTable() {
16 1     1   5 use integer;
  1         1  
  1         5  
17             return {
18 1     1 0 94 'black' => 0x000000,
19             'blue' => 0x0000ff,
20             'aqua' => 0x00ffff,
21             'lime' => 0x00ff00,
22             'fuchsia' => 0xff00ff, # "fuscia" is incorrect but common
23             'fuscia' => 0xff00ff, # mis-spelling...
24             'red' => 0xff0000,
25             'yellow' => 0xffff00,
26             'white' => 0xffffff,
27             'navy' => 0x000080,
28             'teal' => 0x008080,
29             'green' => 0x008000,
30             'purple' => 0x800080,
31             'maroon' => 0x800000,
32             'olive' => 0x808000,
33             'gray' => 0x808080,
34             'silver' => 0xc0c0c0,
35             };
36             }
37              
38             1;
39              
40             __END__