GitHub - michal-josef-spacek/Tags-HTML-Page-End: Tags helper for HTML page end.

Branches Tags

Name		Name	Last commit message	Last commit date
Latest commit History 37 Commits
.github		.github
examples		examples
inc/Module		inc/Module
t/Tags-HTML-Page-End		t/Tags-HTML-Page-End
xt/Tags-HTML-Page-End		xt/Tags-HTML-Page-End
.gitignore		.gitignore
CONCEPT		CONCEPT
Changes		Changes
End.pm		End.pm
LICENSE		LICENSE
MANIFEST		MANIFEST
MANIFEST.SKIP		MANIFEST.SKIP
META.yml		META.yml
Makefile.PL		Makefile.PL
README		README
SIGNATURE		SIGNATURE
TODO		TODO

Repository files navigation

NAME
    Tags::HTML::Page::End - Tags helper for HTML page end.

SYNOPSIS
     use Tags::HTML::Page::End;

     my $obj = Tags::HTML::Page::End->new(%params);
     $obj->process;

METHODS
  "new"
     my $obj = Tags::HTML::Page::End->new(%params);

    Constructor.

    *       "tags"

            'Tags::Output' object.

            It's required.

            Default value is undef.

  "process"
     $obj->process;

    Process Tags structure for output.

    Returns undef.

ERRORS
     new():
             From Class::Utils::set_params():
                     Unknown parameter '%s'.
             From Tags::HTML::new():
                     Parameter 'tags' must be a 'Tags::Output::*' class.

     process():
             From Tags::HTML::process():
                     Parameter 'tags' isn't defined.

EXAMPLE
     use strict;
     use warnings;

     use CSS::Struct::Output::Indent;
     use Tags::HTML::Page::Begin;
     use Tags::HTML::Page::End;
     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,
     );

     # Process page
     $css->put(
            ['s', 'div'],
            ['d', 'color', 'red'],
            ['d', 'background-color', 'black'],
            ['e'],
     );
     $begin->process;
     $tags->put(
            ['b', 'div'],
            ['d', 'Hello world!'],
            ['e', 'div'],
     );
     $end->process;

     # Print out.
     print $tags->flush;

     # Output:
     # <!DOCTYPE html>
     # <html lang="en">
     #   <head>
     #     <meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />
     #     <meta name="generator" content=
     #       "Perl module: Tags::HTML::Page::Begin, Version: 0.13" />
     #     <title>
     #       Page title
     #     </title>
     #     <style type="text/css">
     # div {
     #         color: red;
     #         background-color: black;
     # }
     # </style>
     #   </head>
     #   <body>
     #     <div>
     #       Hello world!
     #     </div>
     #   </body>
     # </html>

DEPENDENCIES
    Tags::HTML.

SEE ALSO
    Tags::HTML::Page::Begin
        Tags helper for HTML page begin.

REPOSITORY
    <https://github.com/michal-josef-spacek/Tags-HTML-Page-End>

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

    <http://skim.cz>

LICENSE AND COPYRIGHT
    © 2020-2024 Michal Josef Špaček

    BSD 2-Clause License

VERSION
    0.07