NAME

View::WebDisplayer - Microlibrary renderer for repetitive print stuffs

DESCRIPTION

SAD (Simple And Dirty) script for web generating XHTML tags. Can be used for templates, by printing XHTML tags into your Microlibrary web-application output . No MVC at all (we were in a hurry). Just instanciate a new View::WebDisplayer and you are ready to generate tags. Depending on wich subroutine you use, you can pass parameters, see ARGUMENTS section.

VERSION

This is version 0.01, well known as a Dime And A Shoestring

CONFIGURATION AND ENVIRONMENT

There is some harcoded XHTML things on the top of the file. Feel free to remplace the code into $header, $header_menu, $sidebar_menu, $logo and $footer to generate a different website. This can be used to generate a very low-tech template. Names are well choosen that's our great pride!

SUBROUTINES / METHODS

print_into_tags()

Open & close tags with many parameters. Should use it when you don't want to imbricate something, especially for inline tags like <span></span> for example. EXAMPLE : <tag key="value">content of the tag</tag>

open_tag()

Open the tag you want with a single, many or none parameter(s). Automatically put the tag into the @tag_stack, that will be emptied when you will close this trash-tag.

close_tag()

Close the last tag you have open. Should not exist, should close automatically. Can take a $newline argument.

header() Just print the XHTML header you've specified into $header.
header_menu() Just print the XHTML header menu you've specified into $header_menu.
logo() Just corporate-print it !
header() Just print it !

ARGUMENTS

Could be specified, depending on what subroutine you will use.

Tag Name of a valid XHTML tag
Content Whatever that will be inserted into the tag. You can pass scalars or static content.
Keys and values One, two or none key-values peers for class="" and/or id="" parameters.
Newline Add a backchar for clean XHTML code. Next year we will code something for indentation.

AUTHOR

Self Shelf Swap - Simon Foutaiz - 2011-06-29

CURRENT MAINTAINER

    my ( $firstname = "seb", $lastname = "feugere", $provider = "gmail"); 
    print $firstname . "." . $lastname . "@" . $provider . "." .com;   

COPYRIGHT AND LICENSE

Copyright 2011 Self Shelf Swap.

This library is free software. You can redistribute it and/or modify it under the same terms as Perl himself.