NAME

Regexp::Common::support -- Support functions for Regexp::Common.

SYNOPSIS

use Regexp::Common::_support qw /luhn/;

luhn ($number)    # Returns true/false.

DESCRIPTION

This module contains some subroutines to be used by other Regexp::Common modules. It's not intended to be used directly. Subroutines from the module may disappear without any notice, or their meaning or interface may change without notice.

luhn

This subroutine returns true if its argument passes the luhn checksum test.

SEE ALSO

http://www.webopedia.com/TERM/L/Luhn_formula.html.

HISTORY

$Log: _support.pm,v $
Revision 2.103  2008/05/23 21:30:09  abigail
Changed email address

Revision 2.102  2008/05/23 21:28:01  abigail
Changed license

Revision 2.101  2004/12/18 11:28:25  abigail
POD nit (Mike Castle)

Revision 2.100  2004/07/01 14:47:00  abigail
Force version

Revision 2.1  2004/07/01 14:46:35  abigail
Initial checkin

AUTHOR

Abigail (regexp-common@abigail.be).

BUGS AND IRRITATIONS

Bound to be plenty.

COPYRIGHT

This software is Copyright (c) 2001 - 2008, Damian Conway and Abigail.

This module is free software, and maybe used under any of the following licenses:

1) The Perl Artistic License.     See the file COPYRIGHT.AL.
2) The Perl Artistic License 2.0. See the file COPYRIGHT.AL2.
3) The BSD Licence.               See the file COPYRIGHT.BSD.
4) The MIT Licence.               See the file COPYRIGHT.MIT.