> https://metacpan.org/module/Data::Verifier
>>>>> https://metacpan.org/module/Data::FormValidator
>>>>> https://metacpan.org/module/Validator::Custom
>>>>> https://metacpan.org/module/Data::Validate
>>>>> https://metacpan.org/module/HTML::FormFu
>>>> Data::Validator
>>>> HTML::FormHandler
>>>
>>> А regexp'ами уже не круто? :)
>>
>> Нет, не круто :)
Ну а если серьезно, больше кода, больше зависимостей, больше
абстракций, выше сложность, меньше надежность, в чем смысл?
>>> %validator = (
>>> age => qr/^[0-9]{2}$/,
>>> login => qr/^\w{4,10}$/,
>>> ...
>>> );
>>>
>>> foreach (keys %form) { exists $validator{$_} && $form{$_} =~
>>> $validator{$_} || die }
--
Moscow.pm mailing list
[email protected] | http://moscow.pm.org
