1Regexp::Common::_supporUts(e3r)Contributed Perl DocumentRaetgieoxnp::Common::_support(3)
2
3
4
6 Regexp::Common::support -- Support functions for Regexp::Common.
7
9 use Regexp::Common::_support qw /luhn/;
10
11 luhn ($number) # Returns true/false.
12
14 This module contains some subroutines to be used by other
15 "Regexp::Common" modules. It's not intended to be used directly.
16 Subroutines from the module may disappear without any notice, or their
17 meaning or interface may change without notice.
18
19 luhn
20 This subroutine returns true if its argument passes the luhn
21 checksum test.
22
24 <http://www.webopedia.com/TERM/L/Luhn_formula.html>.
25
27 Abigail (regexp-common@abigail.be).
28
30 Bound to be plenty.
31
33 This software is Copyright (c) 2001 - 2017, Damian Conway and Abigail.
34
35 This module is free software, and maybe used under any of the following
36 licenses:
37
38 1) The Perl Artistic License. See the file COPYRIGHT.AL.
39 2) The Perl Artistic License 2.0. See the file COPYRIGHT.AL2.
40 3) The BSD License. See the file COPYRIGHT.BSD.
41 4) The MIT License. See the file COPYRIGHT.MIT.
42
43
44
45perl v5.38.0 2023-07-21 Regexp::Common::_support(3)