Graphics::Color::YUV (3pm)

version 0.29

    use Graphics::Color::YUV;

    my $color = Graphics::Color::YUV->new({
        luma            => .5,
        blue_luminance  => .5,
        red_luminance   => .25,
    });

Graphics::Color::YUV represents a Color in an Y'\s-1UV\s0 color space.

luma

y

Set/Get the luma (Y') component of this Color. Aliased to y.

blue_luminance

u

Set/Get the blue_luminance component of this Color. Aliased to u.

red_luminance

v

Set/Get the red_luminance component of this Color. Aliased to v.

name

Get the name of this color. Only valid if the color was created by name.

as_string

Get a string version of this Color in the form of: \s-1LUMA\s0,BLUE_LUMINENCE,RED_LUMINANCE

as_array

Get the \s-1YUV\s0 values as an array

equal_to

Compares this color to the provided one. Returns 1 if true, else 0;

not_equal_to

The opposite of equal_to.

Cory G Watson <[email protected]>

This software is copyright (c) 2011 by Cold Hard Code, \s-1LLC\s0.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.