The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

NAME

Graphics::Color::YUV - YUV color space

DESCRIPTION

Graphics::Color::YUV represents a Color in an Y'UV color space.

SYNOPSIS

    use Graphics::Color::YUV;

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

CONSTRUCTOR

Graphics::Color::YUV->new(%options);

Creates a new Graphics::Color::YUV.

METHODS

equal_to

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

not_equal_to

The opposite of equal_to.

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 LUMA,BLUE_LUMINENCE,RED_LUMINANCE

as_array

Get the YUV values as an array

AUTHOR

Cory Watson, <gphat@cpan.org>

SEE ALSO

perl(1), http://en.wikipedia.org/wiki/YUV

COPYRIGHT & LICENSE

Copyright 2008 - 2009 by Cory G Watson

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