NAME

Mo::utils::CSS - Mo CSS utilities.

SYNOPSIS

use Mo::utils::CSS qw(check_array_css_color check_css_border check_css_class check_css_color check_css_unit);

check_array_css_color($self, $key);
check_css_border($self, $key);
check_css_class($self, $key);
check_css_color($self, $key);
check_css_unit($self, $key);

DESCRIPTION

Mo utilities for checking of CSS style things.

SUBROUTINES

`check_array_css_color`

check_array_css_color($self, $key);

Since version 0.03.

Check parameter defined by $key which is reference to array. Check if all values are CSS colors.

Put error if check isn't ok.

Returns undef.

`check_css_border`

check_css_border($self, $key);

Since version 0.07.

Check parameter defined by $key if it's CSS border. Value could be undefined.

Put error if check isn't ok.

Returns undef.

`check_css_class`

check_css_class($self, $key);

Since version 0.02.

Check parameter defined by $key if it's CSS class name. Value could be undefined.

Put error if check isn't ok.

Returns undef.

`check_css_color`

check_css_color($self, $key);

Since version 0.03.

Check parameter defined by $key if it's CSS color. Value could be undefined.

Put error if check isn't ok.

Returns undef.

`check_css_unit`

check_css_unit($self, $key);

Since version 0.01. Described functionality since version 0.07.

Check parameter defined by $key if it's CSS unit. Value could be undefined.

Put error if check isn't ok.

Returns undef.

ERRORS

check_array_css_color():
        Parameter '%s' has bad color name.
                Value: %s
        Parameter '%s' has bad rgb color (bad hex number).
                Value: %s
        Parameter '%s' has bad rgb color (bad length).
                Value: %s
        Parameter '%s' must be a array.
                Value: %s
                Reference: %s

check_css_border()
        Parameter '%s' contain bad unit.
                Unit: %s
                Value: %s
        Parameter '%s' doesn't contain unit name.
                Value: %s
        Parameter '%s' doesn't contain unit number.
                Value: %s
        Parameter '%s' has bad rgb color (bad hex number).
                Value: %s
        Parameter '%s' has bad rgb color (bad length).
                Value: %s
        Parameter '%s' has bad color name.
                Value: %s
        Parameter '%s' hasn't border style.
                Value: %s
        Parameter '%s' must be a array.
                Value: %s
                Reference: %s

check_css_class():
        Parameter '%s' has bad CSS class name.
                Value: %s
        Parameter '%s' has bad CSS class name (number on begin).
                Value: %s

check_css_color():
        Parameter '%s' has bad color name.
                Value: %s
        Parameter '%s' has bad rgb color (bad hex number).
                Value: %s
        Parameter '%s' has bad rgb color (bad length).
                Value: %s

check_css_unit():
        Parameter '%s' contain bad unit.
                Unit: %s
                Value: %s
        Parameter '%s' doesn't contain unit name.
                Value: %s
        Parameter '%s' doesn't contain unit number.
                Value: %s

EXAMPLE1

use strict;
use warnings;

use Mo::utils::CSS qw(check_array_css_color);

my $self = {
        'key' => [
                'red',
                '#F00', '#FF0000', '#FF000000',
                'rgb(255,0,0)', 'rgba(255,0,0,0.3)',
                'hsl(120, 100%, 50%)', 'hsla(120, 100%, 50%, 0.3)',
        ],
};
check_array_css_color($self, 'key');

# Print out.
print "ok\n";

# Output:
# ok

EXAMPLE2

use strict;
use warnings;

use Error::Pure;
use Mo::utils::CSS qw(check_array_css_color);

$Error::Pure::TYPE = 'Error';

my $self = {
        'key' => ['xxx'],
};
check_array_css_color($self, 'key');

# Print out.
print "ok\n";

# Output like:
# #Error [...utils.pm:?] Parameter 'key' has bad color name.

EXAMPLE3

use strict;
use warnings;

use Mo::utils::CSS qw(check_css_border);

my $self = {
        'key' => '1px solid red',
};
check_css_border($self, 'key');

# Print out.
print "ok\n";

# Output:
# ok

EXAMPLE4

use strict;
use warnings;

use Error::Pure;
use Mo::utils::CSS qw(check_css_border);

$Error::Pure::TYPE = 'Error';

my $self = {
        'key' => 'bad',
};
check_css_border($self, 'key');

# Print out.
print "ok\n";

# Output like:
# #Error [...utils.pm:?] Parameter 'key' has bad border style.

EXAMPLE5

use strict;
use warnings;

use Mo::utils::CSS qw(check_css_class);

my $self = {
        'key' => 'foo-bar',
};
check_css_class($self, 'key');

# Print out.
print "ok\n";

# Output:
# ok

EXAMPLE6

use strict;
use warnings;

use Error::Pure;
use Mo::utils::CSS qw(check_css_class);

$Error::Pure::TYPE = 'Error';

my $self = {
        'key' => '1xxx',
};
check_css_class($self, 'key');

# Print out.
print "ok\n";

# Output like:
# #Error [...utils.pm:?] Parameter 'key' has bad CSS class name (number of begin).

EXAMPLE7

use strict;
use warnings;

use Mo::utils::CSS qw(check_css_color);

my $self = {
        'key' => '#F00',
};
check_css_color($self, 'key');

# Print out.
print "ok\n";

# Output:
# ok

EXAMPLE8

use strict;
use warnings;

use Error::Pure;
use Mo::utils::CSS qw(check_css_color);

$Error::Pure::TYPE = 'Error';

my $self = {
        'key' => 'xxx',
};
check_css_color($self, 'key');

# Print out.
print "ok\n";

# Output like:
# #Error [...utils.pm:?] Parameter 'key' has bad color name.

EXAMPLE9

use strict;
use warnings;

use Mo::utils::CSS qw(check_css_unit);

my $self = {
        'key' => '123px',
};
check_css_unit($self, 'key');

# Print out.
print "ok\n";

# Output:
# ok

EXAMPLE10

use strict;
use warnings;

use Error::Pure;
use Mo::utils::CSS qw(check_css_unit);

$Error::Pure::TYPE = 'Error';

my $self = {
        'key' => '12',
};
check_css_unit($self, 'key');

# Print out.
print "ok\n";

# Output like:
# #Error [...utils.pm:?] Parameter 'key' doesn't contain unit name.

DEPENDENCIES

Error::Pure, Exporter, Graphics::ColorNames::CSS, List::Util, Mo::utils, Readonly.

REPOSITORY

https://github.com/michal-josef-spacek/Mo-utils-CSS

AUTHOR

Michal Josef Špaček mailto:skim@cpan.org

http://skim.cz

LICENSE AND COPYRIGHT

BSD 2-Clause License

VERSION

0.08

To install Mo::utils::CSS, copy and paste the appropriate command in to your terminal.

cpanm

cpanm Mo::utils::CSS

CPAN shell

perl -MCPAN -e shell
install Mo::utils::CSS

For more information on module installation, please visit the detailed CPAN module installation guide.

	Global
`s`	Focus search bar
`?`	Bring up this help dialog

	GitHub
`g` `p`	Go to pull requests
`g` `i`	go to github issues (only if github is preferred repository)

	POD
`g` `a`	Go to author
`g` `c`	Go to changes
`g` `i`	Go to issues
`g` `d`	Go to dist
`g` `r`	Go to repository/SCM
`g` `s`	Go to source
`g` `b`	Go to file browse

	Search terms
module: (e.g. module:Plugin)
distribution: (e.g. distribution:Dancer auth)
author: (e.g. author:SONGMU Redis)
version: (e.g. version:1.00)

NAME

SYNOPSIS

DESCRIPTION

SUBROUTINES

check_array_css_color

check_css_border

check_css_class

check_css_color

check_css_unit

ERRORS

EXAMPLE1

EXAMPLE2

EXAMPLE3

EXAMPLE4

EXAMPLE5

EXAMPLE6

EXAMPLE7

EXAMPLE8

EXAMPLE9

EXAMPLE10

DEPENDENCIES

SEE ALSO

REPOSITORY

AUTHOR

LICENSE AND COPYRIGHT

VERSION

Module Install Instructions

`check_array_css_color`

`check_css_border`

`check_css_class`

`check_css_color`

`check_css_unit`