package HTML::FormFu::Constraint::Integer; use strict; use base 'HTML::FormFu::Constraint::Regex'; sub regex {qr/^[0-9]*\z/} 1; __END__ =head1 NAME HTML::FormFu::Constraint::Integer - Unsigned Integer Constraint =head1 DESCRIPTION Integer constraint. =head1 SEE ALSO Is a sub-class of, and inherits methods from L, L L =head1 AUTHOR Carl Franks, C Based on the original source code of L, by Sebastian Riedel, C. =head1 LICENSE This library is free software, you can redistribute it and/or modify it under the same terms as Perl itself. =cut