NAME Tags::HTML::Messages - Tags helper for HTML page begin. SYNOPSIS use Tags::HTML::Messages; my $obj = Tags::HTML::Messages->new(%params); $obj->process($message_ar, $id); $obj->process_css($id, $color); METHODS "new" my $obj = Tags::HTML::Messages->new(%params); Constructor. * "css" 'CSS::Struct::Output' object for process_css processing. It's required. Default value is undef. * "tags" 'Tags::Output' object. It's required. Default value is undef. "process" $obj->process($message_ar, $id); Process Tags structure for output. Returns undef. "process_css" $obj->process_css($id, $color); Process CSS::Struct structure for output. Returns undef. ERRORS new(): Parameter 'css' must be a 'CSS::Struct::Output::*' class. Parameter 'tags' must be a 'Tags::Output::*' class. From Class::Utils::set_params(): Unknown parameter '%s'. EXAMPLE1 use strict; use warnings; use CSS::Struct::Output::Indent; use Tags::HTML::Page::Begin; use Tags::HTML::Page::End; use Tags::HTML::Messages; use Tags::Output::Indent; # Object. my $tags = Tags::Output::Indent->new( 'preserved' => ['style'], 'xml' => 1, ); my $css = CSS::Struct::Output::Indent->new; my $begin = Tags::HTML::Page::Begin->new( 'css' => $css, 'tags' => $tags, ); my $end = Tags::HTML::Page::End->new( 'tags' => $tags, ); my $messages = Tags::HTML::Messages->new( 'css' => $css, 'tags' => $tags, ); # Error structure. my $error_messages_ar = [ 'Error #1', 'Error #2', ]; my $ok_messages_ar = [ 'Ok #1', 'Ok #2', ]; # Process page. $messages->process_css('error', 'red'); $messages->process_css('ok', 'green'); $begin->process; $messages->process($error_messages_ar, 'error'); $messages->process($ok_messages_ar, 'ok'); $end->process; # Print out. print $tags->flush; # Output: # <!DOCTYPE html> # <html> # <head> # <meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /> # <title> # Page title # </title> # <style type="text/css"> # #error { # color: red; # } # #ok { # color: green; # } # </style> # </head> # <body> # <span id="error"> # Error #1 # </span> # <span id="error"> # Error #2 # </span> # <span id="ok"> # Ok #1 # </span> # <span id="ok"> # Ok #2 # </span> # </body> # </html> DEPENDENCIES Class::Utils, Error::Pure. REPOSITORY <https://github.com/michal-josef-spacek/Tags-HTML-Messages> AUTHOR Michal Josef Å paÄek <mailto:skim@cpan.org> <http://skim.cz> LICENSE AND COPYRIGHT © Michal Josef Å paÄek 2020 BSD 2-Clause License VERSION 0.01