diff --git a/Templates/controller.pm.tem b/Templates/controller.pm.tem index a1a3bd4..46a065e 100644 --- a/Templates/controller.pm.tem +++ b/Templates/controller.pm.tem @@ -136,7 +136,7 @@ sub do_update { my $params = ${ $c->req->params->to_hash }; # Get number of POST parameters - my $num_params = keys scaler %$params; + my $num_params = keys %params; #Params are available in the hash "params" - copy to the prefix_data hash while (my ($key, $value) = each %{$c->req->params->to_hash}) {