The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Prty::Color - Eine Farbe des RGB-Farbraums

BASE CLASS

Prty::Object

SYNOPSIS

    use Prty::Color;
    
    # Instantiierung
    
    $col = Prty::Color->new(255,0,0); # aus dez. RGB-Tripel
    $col = Prty::Color->new('ff0000'); # aus hex. RGB-String
    
    # Helligkeit
    
    $brightness = $col->brightness; # 0 .. 255
    
    # Farbname
    
    $col->name('red'); # setzen
    $name = $col->name; # abfragen
    
    # Externe Repräsentation
    
    $hex = $col->hexString; # 'ff0000' - hex. RGB-String
    @rgb = $col->rgb; # (255,0,0) - dez. RGB-Tripel

DESCRIPTION

Ein Objekt der Klasse repräsentiert eine Farbe des RGB-Farbraums, also ein Tripel (R, G, B).

Das Objekt kann aus verschiedenen externen Repräsentationen instantiiert werden und kann seinerseits verschiedene externe Repräsentationen liefern. Ferner kann die Helligkeit der Farbe ermittelt werden, was für eine Fontauswahl nützlich sein kann. Außerdem kann der Farbe ein Name zugewiesen werden.

METHODS

Konstruktor

new() - Konstruktor

Synopsis

    $col = $class->new($r,$g,$b);
    $col = $class->new(\@rgb);
    $col = $class->new('rrggbb');
    $col = $class->new('#rrggbb');

Description

Instantiiere eine RGB-Farbe und liefere eine Referenz auf das Objekt zurück.

Farbeigenschaften

brightness() - Helligkeit der Farbe

Synopsis

    $brightness = $col->brightness;

Description

Liefere die Helligkeit der Farbe im Wertebereich 0 (schwarz) bis 255 (weiß). Bei einem Wert < 128 ist die Farbe dunkel, andernfalls hell.

Die Methode kann genutzt werden um zu entscheiden, welche Textfarbe auf einem Hintergrund mit der Farbe genutzt werden sollte.

Die Helligkeitsberechnung erfolgt auf Grundlage der Heuristik:

    $brightness = sqrt 0.299*$r**2 + 0.587*$g**2 + 0.114*$b**2;

Example

    $col = Prty::Color->new('ff0000');
    $brightness = $col->brightness;
    -> 139.44

See Also

name() - Setze/Liefere Farbname

Synopsis

    $name = $col->name($name);
    $name = $col->name;

Description

Das Farbobjekt besitzt zunächst keinen Namen. Mit dieser Methode kann der Farbe jedoch ein Name zugewiesen und abgefragt werden.

Wurde dem Farbobjekt kein Name zugewiesen, liefert die Methode einen Leerstring.

Example

    my $col = Prty::Color->new(255,0,0);
    $col->name('red');
    $name = $col->name;
    -> 'red'

Externe Repräsentationen

hexString() - Farbwert als Hex-String

Synopsis

    $hexStr = $col->hexString;

Description

Liefere den Farbwert der Farbe als Hex-String

Example

    $col = Prty::Color->new(255,255,255);
    $hexStr = Prty::Color->hexString;
    -> 'ffffff'

rgb() - Farbwert als Liste von dezimalen Werten

Synopsis

    @rgb | $rgbA = $col->rgb;

Description

Liefere den Farbwert als Liste von dezimalen Werten mit den Komponenten R, G, B. Im Skalarkontext liefere eine Referenz auf die Liste.

Example

    $col = Prty::Color->new('ffffff');
    @rgb = Prty::Color->rgb;
    -> (255,255,255)

VERSION

1.112

AUTHOR

Frank Seitz, http://fseitz.de/

COPYRIGHT

Copyright (C) 2017 Frank Seitz

LICENSE

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