Help for this page

Select Code to Download

Select or download this

sub define_color {
    my $this = shift;
    my $name = shift;
...

    return 1;
}