Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
branch: master
Fetching contributors…

Cannot retrieve contributors at this time

14 lines (11 sloc) 0.296 kb
package MyNormalization2;
use strict;
use warnings;
use base qw(Dancer::Plugin::Params::Normalization::Abstract);
# shorten to 3 last caracters
sub normalize {
my ($self, $params) = @_;
$params->{substr($_, -3, 3)} = delete $params->{$_} foreach keys %$params;
return $params;
}
1;
Jump to Line
Something went wrong with that request. Please try again.