Regexp::Common::_support(3p)

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.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.nl).

BUGS AND IRRITATIONS
Bound to be plenty.

COPYRIGHT
 Copyright (c) 2001-2004, Damian Conway and Abigail. All Rights Reserved.
       This module is free software. It may be used, redistributed
      and/or modified under the terms of the Perl Artistic License
            (see http://www.perl.com/perl/misc/Artistic.html)