NAME

Data::Constraint - Trying to bring definitional succintness to Perl

SYNOPSIS if (nonzero $value) { ; } if (zero $value) { ; }

if (nonzero(map { $PAGEMODE eq $_ } ('CONFIRM_OFFER', 'VIEW_DETAILS', 'Purchase Item', 'Confirm Counter Offer')) { handle_these_pagemodes() }

Possibly more time-consuming, but certainly more succint!

DESCRIPTION

This module is to make constraint checking of lists of values more concise.

KNOWN BUGS AND LIMITATIONS

none

SEE ALSO

REBOL (http://www.rebol.com)

AUTHOR

Terrence Brannon <princepawn@yahoo.com>

COPYRIGHT

This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself.