use strict; package HTML::FormFu::Constraint::MaxRange; $HTML::FormFu::Constraint::MaxRange::VERSION = '2.07'; # ABSTRACT: Maximum Value Constraint use Moose; extends 'HTML::FormFu::Constraint::Range'; sub _localize_args { my ($self) = @_; return $self->max; } __PACKAGE__->meta->make_immutable; 1; __END__ =pod =encoding UTF-8 =head1 NAME HTML::FormFu::Constraint::MaxRange - Maximum Value Constraint =head1 VERSION version 2.07 =head1 DESCRIPTION Checks the input value is equal to or less than a maximum value. Overrides L, so that the value of L is passed as an argument to L. This constraint doesn't honour the C value. =head1 METHODS =head2 maximum =head2 max The maximum input value. L is an alias for L. =head1 SEE ALSO Is a sub-class of, and inherits methods from L, L L =head1 AUTHOR Carl Franks C =head1 LICENSE This library is free software, you can redistribute it and/or modify it under the same terms as Perl itself. =head1 AUTHOR Carl Franks =head1 COPYRIGHT AND LICENSE This software is copyright (c) 2018 by Carl Franks. This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself. =cut