Params::Validate::validation_options( 
    normalize_keys => sub { $_[0] =~ s/^-//; lc $_[0] }
);