Parent Directory
| 
Revision Log
cpeanup and spit html generation into own package - time template generation - wrap pages in html/head/body - cleanup server and move logic there
| 1 | package View; |
| 2 | |
| 3 | use strict; |
| 4 | use warnings; |
| 5 | |
| 6 | use Template::Declare::Tags; # defaults to 'HTML' |
| 7 | use base 'Template::Declare'; |
| 8 | |
| 9 | use Data::Dump qw/dump/; |
| 10 | |
| 11 | template user => sub { |
| 12 | my ( $self, $user ) = @_; |
| 13 | p {'Hello, world wide web!'} |
| 14 | pre { |
| 15 | outs( dump( $user ) ); |
| 16 | } |
| 17 | }; |
| 18 | |
| 19 | 1; |
| ViewVC Help | |
| Powered by ViewVC 1.1.26 |