]> iEval git - gruntmaster-page.git/blame - lib/Gruntmaster/Page/Us/Entry.pm
Heeere's Plack/PSGI!
[gruntmaster-page.git] / lib / Gruntmaster / Page / Us / Entry.pm
CommitLineData
4aa8ba86
MG
1package Gruntmaster::Page::Us::Entry;
2
3use 5.014000;
4use strict;
5use warnings;
bb95f538
MG
6use Gruntmaster::Page::Base us_entry => '<tmpl_var name>';
7our @ISA = qw/Gruntmaster::Page::Base/;
4aa8ba86
MG
8our $VERSION = '0.001';
9
bb95f538 10use constant TEMPLATES => {
4aa8ba86
MG
11 en => <<'HTML',
12<h1><tmpl_var name></h1>
13Town: <tmpl_var town><br>
14University: <tmpl_var university><br>
15Level: <tmpl_var level>
16HTML
bb95f538 17};
4aa8ba86 18
bb95f538 19sub _generate{
7dc32473
MG
20 my ($self, $htc, $lang, $logger, $us) = @_;
21 debug $logger => "language is '$lang', user is '$us'";
22 local $_ = $us;
4aa8ba86
MG
23
24 $htc->param(name => user_name);
25 $htc->param(town => user_town);
26 $htc->param(university => user_university);
27 $htc->param(level => user_level);
4aa8ba86
MG
28}
29
301
This page took 0.025152 seconds and 4 git commands to generate.