use Plack::Request;
sub generate{
- my ($self, $format, $env, $ct, $job, $ext) = @_;
+ my ($self, $format, $env) = @_;
my $r = Plack::Request->new($env);
my ($username, $password, $confirm_password, $name, $email, $phone, $town, $university, $level) = map { die if length > 200; $_ } map {scalar $r->param($_)} qw/username password confirm_password name email phone town university level/;
insert_user $username, name => $name, email => $email, phone => $phone, town => $town, university => $university, level => $level;
- #PUBLISH genpage => "us/index.html";
- #PUBLISH genpage => "us/$username.html";
+ purge "/us/";
reply 'Registered successfully';
}