RECENT POSTS

Do you have GDPR compliance issues ?

Check out Legiscope a GDPR compliance software, that will save you weeks of work, automating your documentation, the training of your teams and all processes you need to keep your organisation compliant with privacy regulations

P5-business-creditcard

Jul 20, 2023

Perl5 module to validate/generate credit card checksums/names

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.

Checkout these related ports: