| line |
true |
false |
branch |
|
16
|
0 |
0 |
ref $_[0] eq 'HASH' ? : |
|
22
|
0 |
0 |
unless scalar grep({$_ eq $$hash{'color'};} ('AQUA', 'BLACK', 'BRICK_YELLOW', 'BRIGHT_BLUE', 'BRIGHT_GREEN', 'BRIGHT_ORANGE', 'BRIGHT_PURPLE', 'BRIGHT_RED', 'BRIGHT_REDDISH_VIOLET', 'BRIGHT_YELLOW', 'BRIGHT_YELLOWISH_GREEN', 'COOL_YELLOW', 'DARK_AZUR', 'DARK_BROWN', 'DARK_GREEN', 'DARK_ORANGE', 'DARK_RED', 'DARK_STONE_GREY', 'EARTH_BLUE', 'EARTH_GREEN', 'FLAME_YELLOWISH_ORANGE', 'LAVENDER', 'LIGHT_NOUGAT', 'LIGHT_PURPLE', 'LIGHT_ROYAL_BLUE', 'LIGHT_STONE_GREY', 'MEDIUM_AZUR', 'MEDIUM_BLUE', 'MEDIUM_LAVENDER', 'MEDIUM_LILAC', 'MEDIUM_NOUGAT', 'MEDIUM_STONE_GREY', 'MEDIUM_YELLOWISH_GREEN', 'NOUGAT', 'OLIVE_GREEN', 'REDDISH_BROWN', 'SAND_BLUE', 'SAND_GREEN', 'SAND_YELLOW', 'SPRING_YELLOWISH_GREEN', 'WHITE', 'WHITE_GLOW')) |
|
30
|
0 |
0 |
!$$hash{'meta'} || ref $$hash{'meta'} ne 'HASH' ? : |
|
48
|
0 |
0 |
if (defined $val) |
|
49
|
0 |
0 |
unless scalar grep({$_ eq $val;} ('AQUA', 'BLACK', 'BRICK_YELLOW', 'BRIGHT_BLUE', 'BRIGHT_GREEN', 'BRIGHT_ORANGE', 'BRIGHT_PURPLE', 'BRIGHT_RED', 'BRIGHT_REDDISH_VIOLET', 'BRIGHT_YELLOW', 'BRIGHT_YELLOWISH_GREEN', 'COOL_YELLOW', 'DARK_AZUR', 'DARK_BROWN', 'DARK_GREEN', 'DARK_ORANGE', 'DARK_RED', 'DARK_STONE_GREY', 'EARTH_BLUE', 'EARTH_GREEN', 'FLAME_YELLOWISH_ORANGE', 'LAVENDER', 'LIGHT_NOUGAT', 'LIGHT_PURPLE', 'LIGHT_ROYAL_BLUE', 'LIGHT_STONE_GREY', 'MEDIUM_AZUR', 'MEDIUM_BLUE', 'MEDIUM_LAVENDER', 'MEDIUM_LILAC', 'MEDIUM_NOUGAT', 'MEDIUM_STONE_GREY', 'MEDIUM_YELLOWISH_GREEN', 'NOUGAT', 'OLIVE_GREEN', 'REDDISH_BROWN', 'SAND_BLUE', 'SAND_GREEN', 'SAND_YELLOW', 'SPRING_YELLOWISH_GREEN', 'WHITE', 'WHITE_GLOW')) |
|
64
|
0 |
0 |
if (defined $val) |
|
77
|
0 |
0 |
if (defined $val) |
|
90
|
0 |
0 |
if (defined $val) |