Sledge::Plugin::Validator

Sledge::Plugin::Validatorです。

テンプレ側で function（NOT_NULL）とかを指定しなくても
現在Validチェックで引っかかっている何かしらのエラーの文言を返すメソッドがほしかった。

[% valid.error_message(valid_param) %]

とテンプレで書いておけば、適当なValidメッセージがかえってくるような。

で、Sledge::Plugin::Validator に以下のメソッドを追加。

sub error_message {
my $self = shift;
my $param = shift || return;
my @valid_key = %{ $self->{ERROR}->{$param} };
$self->get_error_message($param,uc($valid_key[0]));
}

あと Sledge::Plugin::Validator::range とかも作ってみたので
あとから書く予定。