| line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
|
1
|
|
|
|
|
|
|
package Graphics::ColorNames::Crayola; |
|
2
|
|
|
|
|
|
|
|
|
3
|
|
|
|
|
|
|
=head1 NAME |
|
4
|
|
|
|
|
|
|
|
|
5
|
|
|
|
|
|
|
Graphics::ColorNames::Crayola - the original 48 crayola crayon colors |
|
6
|
|
|
|
|
|
|
|
|
7
|
|
|
|
|
|
|
=head1 SYNOPSIS |
|
8
|
|
|
|
|
|
|
|
|
9
|
|
|
|
|
|
|
require Graphics::ColorNames::Crayola; |
|
10
|
|
|
|
|
|
|
|
|
11
|
|
|
|
|
|
|
$NameTable = Graphics::ColorNames::Crayola->NamesRgbTable(); |
|
12
|
|
|
|
|
|
|
$RgbBlack = $NameTable->{black}; |
|
13
|
|
|
|
|
|
|
|
|
14
|
|
|
|
|
|
|
=head1 DESCRIPTION |
|
15
|
|
|
|
|
|
|
|
|
16
|
|
|
|
|
|
|
A palette based on the original 48 crayola crayon colors. |
|
17
|
|
|
|
|
|
|
|
|
18
|
|
|
|
|
|
|
These colors are based on scanned images of crayon colors, so they |
|
19
|
|
|
|
|
|
|
may not correspond with their standard X colors of the same names. |
|
20
|
|
|
|
|
|
|
|
|
21
|
|
|
|
|
|
|
=begin readme |
|
22
|
|
|
|
|
|
|
|
|
23
|
|
|
|
|
|
|
=head1 REVISION HISTORY |
|
24
|
|
|
|
|
|
|
|
|
25
|
|
|
|
|
|
|
Changes since the last release |
|
26
|
|
|
|
|
|
|
|
|
27
|
|
|
|
|
|
|
=for readme include file=Changes start=^1.01 stop=^1.00 type=text |
|
28
|
|
|
|
|
|
|
|
|
29
|
|
|
|
|
|
|
More details can be found in the F file. |
|
30
|
|
|
|
|
|
|
|
|
31
|
|
|
|
|
|
|
=end readme |
|
32
|
|
|
|
|
|
|
|
|
33
|
|
|
|
|
|
|
=head1 SEE ALSO |
|
34
|
|
|
|
|
|
|
|
|
35
|
|
|
|
|
|
|
L |
|
36
|
|
|
|
|
|
|
|
|
37
|
|
|
|
|
|
|
=head1 AUTHOR |
|
38
|
|
|
|
|
|
|
|
|
39
|
|
|
|
|
|
|
Implemented as a plugin for L by |
|
40
|
|
|
|
|
|
|
Robert Rothenberg . |
|
41
|
|
|
|
|
|
|
|
|
42
|
|
|
|
|
|
|
This palette comes from Bill ? |
|
43
|
|
|
|
|
|
|
L. |
|
44
|
|
|
|
|
|
|
|
|
45
|
|
|
|
|
|
|
=head1 LICENSE |
|
46
|
|
|
|
|
|
|
|
|
47
|
|
|
|
|
|
|
This software is public domain. No copyright is claimed by the author |
|
48
|
|
|
|
|
|
|
for it. |
|
49
|
|
|
|
|
|
|
|
|
50
|
|
|
|
|
|
|
It is possible that Crayola Company (L) may |
|
51
|
|
|
|
|
|
|
claim ownership of some vague intellectual-property-related |
|
52
|
|
|
|
|
|
|
turf for the crayons, their names, or colors, depending on how |
|
53
|
|
|
|
|
|
|
insecure or bored their lawyers are feeling at any moment. |
|
54
|
|
|
|
|
|
|
|
|
55
|
|
|
|
|
|
|
=cut |
|
56
|
|
|
|
|
|
|
|
|
57
|
1
|
|
|
1
|
|
803
|
use strict; |
|
|
1
|
|
|
|
|
3
|
|
|
|
1
|
|
|
|
|
57
|
|
|
58
|
|
|
|
|
|
|
|
|
59
|
|
|
|
|
|
|
our $VERSION = '1.01'; |
|
60
|
|
|
|
|
|
|
|
|
61
|
|
|
|
|
|
|
sub NamesRgbTable() { |
|
62
|
1
|
|
|
1
|
|
876
|
use integer; |
|
|
1
|
|
|
|
|
9
|
|
|
|
1
|
|
|
|
|
5
|
|
|
63
|
|
|
|
|
|
|
return { |
|
64
|
0
|
|
|
0
|
0
|
|
"black" => 0x313e38, |
|
65
|
|
|
|
|
|
|
"gray" => 0x646f6c, |
|
66
|
|
|
|
|
|
|
"brown" => 0x73503c, |
|
67
|
|
|
|
|
|
|
"sepia" => 0x6c4f3c, |
|
68
|
|
|
|
|
|
|
"chestnut" => 0x954535, |
|
69
|
|
|
|
|
|
|
"mahogany" => 0xba4f35, |
|
70
|
|
|
|
|
|
|
"burntsienna" => 0xbd6638, |
|
71
|
|
|
|
|
|
|
"rawsienna" => 0x9f6a3b, |
|
72
|
|
|
|
|
|
|
"tumbleweed" => 0xb98a64, |
|
73
|
|
|
|
|
|
|
"tan" => 0xda7b3c, |
|
74
|
|
|
|
|
|
|
"timberwolf" => 0xadb0aa, |
|
75
|
|
|
|
|
|
|
"white" => 0xfafaf7, |
|
76
|
|
|
|
|
|
|
"lavender" => 0xee92d0, |
|
77
|
|
|
|
|
|
|
"salmon" => 0xf6698a, |
|
78
|
|
|
|
|
|
|
"carnationpink" => 0xfa7fc1, |
|
79
|
|
|
|
|
|
|
"mauvelous" => 0xd0687e, |
|
80
|
|
|
|
|
|
|
"melon" => 0xf6857d, |
|
81
|
|
|
|
|
|
|
"peach" => 0xf5bc89, |
|
82
|
|
|
|
|
|
|
"apricot" => 0xf7ca83, |
|
83
|
|
|
|
|
|
|
"dandelion" => 0xedd80b, |
|
84
|
|
|
|
|
|
|
"goldenrod" => 0xeccc24, |
|
85
|
|
|
|
|
|
|
"olivegreen" => 0x8aa845, |
|
86
|
|
|
|
|
|
|
"grannysmithapple" => 0x5cbf64, |
|
87
|
|
|
|
|
|
|
"seagreen" => 0x50cf9b, |
|
88
|
|
|
|
|
|
|
"skyblue" => 0x47b0e3, |
|
89
|
|
|
|
|
|
|
"cornflower" => 0x6590d8, |
|
90
|
|
|
|
|
|
|
"cadetblue" => 0x7580a0, |
|
91
|
|
|
|
|
|
|
"cerulian" => 0x0071cd, |
|
92
|
|
|
|
|
|
|
"purplemountainsmajesty" => 0x8a6dc1, |
|
93
|
|
|
|
|
|
|
"wistera" => 0xb681cf, |
|
94
|
|
|
|
|
|
|
"violetred" => 0xe82362, |
|
95
|
|
|
|
|
|
|
"red" => 0xe32135, |
|
96
|
|
|
|
|
|
|
"scarlet" => 0xed3825, |
|
97
|
|
|
|
|
|
|
"redorange" => 0xf1612a, |
|
98
|
|
|
|
|
|
|
"orange" => 0xf3770c, |
|
99
|
|
|
|
|
|
|
"yelloworange" => 0xf59506, |
|
100
|
|
|
|
|
|
|
"macaroniandcheese" => 0xf6a94b, |
|
101
|
|
|
|
|
|
|
"yellow" => 0xebdd05, |
|
102
|
|
|
|
|
|
|
"greenyellow" => 0xe2de2b, |
|
103
|
|
|
|
|
|
|
"springgreen" => 0xc9d760, |
|
104
|
|
|
|
|
|
|
"yellowgreen" => 0x84c82e, |
|
105
|
|
|
|
|
|
|
"green" => 0x008846, |
|
106
|
|
|
|
|
|
|
"bluegreen" => 0x0083ae, |
|
107
|
|
|
|
|
|
|
"blue" => 0x0345be, |
|
108
|
|
|
|
|
|
|
"indigo" => 0x3c3591, |
|
109
|
|
|
|
|
|
|
"blueviolet" => 0x5d3694, |
|
110
|
|
|
|
|
|
|
"violet" => 0x79338d, |
|
111
|
|
|
|
|
|
|
"redviolet" => 0xb32f79, |
|
112
|
|
|
|
|
|
|
}; |
|
113
|
|
|
|
|
|
|
} |
|
114
|
|
|
|
|
|
|
|
|
115
|
|
|
|
|
|
|
1; |
|
116
|
|
|
|
|
|
|
|
|
117
|
|
|
|
|
|
|
__END__ |