NAME

Tags::HTML::GradientIndicator - Tags helper for gradient evaluation.

SYNOPSIS

use Tags::HTML::GradientIndicator;

my $obj = Tags::HTML::GradientIndicator->new(%params);
$obj->process($stars_hr);
$obj->process_css;

METHODS

new

my $obj = Tags::HTML::GradientIndicator->new(%params);

Constructor.

  • css

    'CSS::Struct::Output' object for process_css processing.

    It's required.

    Default value is undef.

  • css_background_image

    CSS parameter for background-image of gradient.

    Default value is 'linear-gradient(to right, red, orange, yellow, green, blue, indigo, violet)'.

  • css_gradient_class

    CSS class name for gradient.

    Default value is 'gradient'.

  • height

    Indicator height.

    Default value is 30.

  • width

    Indicator width.

    Default value is 500.

  • tags

    'Tags::Output' object.

    Default value is undef.

process

$obj->process($percent_value);

Process Tags structure for gradient.

Returns undef.

process_css

$obj->process_css;

Process CSS::Struct structure for output.

Returns undef.

ERRORS

new():
        From Class::Utils::set_params():
                Unknown parameter '%s'.
        From Mo::utils::CSS::check_css_unit():
                Parameter 'height' doesn't contain unit number.
                        Value: %s
                Parameter 'height' doesn't contain unit name.
                        Value: %s
                Parameter 'height' contain bad unit.
                        Unit: %s
                        Value: %s
                Parameter 'width' doesn't contain unit number.
                        Value: %s
                Parameter 'width' doesn't contain unit name.
                        Value: %s
                Parameter 'width' contain bad unit.
                        Unit: %s
                        Value: %s
        From Tags::HTML::new():
                Parameter 'css' must be a 'CSS::Struct::Output::*' class.
                Parameter 'tags' must be a 'Tags::Output::*' class.

EXAMPLE1

use strict;
use warnings;

use CSS::Struct::Output::Indent;
use Tags::HTML::GradientIndicator;
use Tags::Output::Indent;

# Object.
my $css = CSS::Struct::Output::Indent->new;
my $tags = Tags::Output::Indent->new;
my $obj = Tags::HTML::GradientIndicator->new(
        'css' => $css,
        'tags' => $tags,
);

# Process indicator.
$obj->process_css;
$obj->process(50);

# Print out.
print "CSS\n";
print $css->flush."\n";
print "HTML\n";
print $tags->flush."\n";

# Output:
# CSS
# .gradient {
#         height: 30px;
#         width: 500px;
#         background-color: red;
#         background-image: linear-gradient(to right, red, orange, yellow, green, blue, indigo, violet);
# }
# HTML
# <div style="width: 250px;overflow: hidden;">
#   <div class="gradient">
#   </div>
# </div>

EXAMPLE2

use strict;
use warnings;

use CSS::Struct::Output::Indent;
use Tags::HTML::GradientIndicator;
use Tags::Output::Indent;

if (@ARGV < 1) {
        print STDERR "Usage: $0 percent\n";
        exit 1;
}
my $percent = $ARGV[0];

# Object.
my $css = CSS::Struct::Output::Indent->new;
my $tags = Tags::Output::Indent->new;
my $obj = Tags::HTML::GradientIndicator->new(
        'css' => $css,
        'tags' => $tags,
);

# Process indicator.
$obj->process_css;
$obj->process($percent);

# Print out.
print "CSS\n";
print $css->flush."\n";
print "HTML\n";
print $tags->flush."\n";

# Output for 30:
# CSS
# .gradient {
#         height: 30px;
#         width: 500px;
#         background-color: red;
#         background-image: linear-gradient(to right, red, orange, yellow, green, blue, indigo, violet);
# }
# HTML
# <div style="width: 150px;overflow: hidden;">
#   <div class="gradient">
#   </div>
# </div>

DEPENDENCIES

Class::Utils, Error::Pure, Mo::utils::CSS, Tags::HTML.

SEE ALSO

Tags::HTML::Stars

Tags helper for stars evaluation.

REPOSITORY

https://github.com/michal-josef-spacek/Tags-HTML-GradientIndicator

AUTHOR

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

http://skim.cz

LICENSE AND COPYRIGHT

© Michal Josef Špaček 2021-2024

BSD 2-Clause License

VERSION

0.06