./misc/p5-Business-CreditCard, Perl5 module to validate/generate credit card checksums/names

[ CVSweb ] [ Homepage ] [ RSS ] [ Required by ] [ Add to tracker ]

Branch: pkgsrc-2009Q4, Version: 0.30nb1, Package name: p5-Business-CreditCard-0.30nb1, Maintainer: pkgsrc-users

These subroutines tell you whether a credit card number is
self-consistent -- whether the last digit of the number is a valid
checksum for the preceding digits.

The validate() subroutine returns 1 if the card number provided passes
the checksum test, and 0 otherwise.

The cardtype() subroutine returns a string containing the type of card:
"MasterCard", "VISA", and so on. My list is not complete; I welcome
additions.

The generate_last_digit() subroutine computes and returns the last digit
of the card given the preceding digits. With a 16-digit card, you
provide the first 15 digits; the subroutine returns the sixteenth.

This module does not tell you whether the number is on an actual card,
only whether it might conceivably be on a real card.

These subroutines will also work if you provide the arguments as numbers
instead of strings, e.g. validate(5276440065421319).

Master sites: (Expand)

SHA1: d725fceb501f082abfb291aeb0bb77590fcaef68
RMD160: dff5d6ff33ceb8e397c45361a24a4b42d321eca5
Filesize: 5.79 KB

Version history: (Expand)