]>
iEval git - plack-app-gruntmaster.git/blob - Gruntmaster/Page/Account.pm
1 package Gruntmaster
::Page
::Account
;
6 use parent qw
/Exporter/;
7 our @EXPORT_OK = qw
/generate/;
8 our $VERSION = '0.001';
10 use constant TITLE
=> 'Account';
12 use HTML
::Template
::Compiled
;
13 use Gruntmaster
::Page
::Common qw
/header footer patch_templates/;
17 <div id="result"></div>
20 <form action="/action/register" method="POST" class="jsform">
22 <input type="text" name="username" required><br>
24 <input type="password" name="password" required><br>
26 <input type="password" name="confirm_password" required><br>
28 <input type="text" name="name" required><br>
30 <input type="email" name="email" required><br>
32 <input type="text" name="town" required><br>
33 University <i>(full name)</i>:<br>
34 <input type="text" name="university" required><br>
35 <input type="submit" value="Register">
38 <h1>Change password</h1>
39 <form action="/action/passwd" method="POST" class="jsform">
41 <input type="password" name="password" required><br>
43 <input type="password" name="new_password" required><br>
44 Confirm new password:<br>
45 <input type="password" name="confirm_new_password" required><br>
46 <input type="submit" value="Change password">
51 patch_templates
%templates, 'account';
53 $templates{$_} = header
($_, TITLE
) . $templates{$_} for keys %templates;
54 $templates{$_} .= footer
$_ for keys %templates;
57 HTML
::Template
::Compiled
->new(scalarref
=> \
$templates{$_[1]})->output
This page took 0.046466 seconds and 4 git commands to generate.