Business::CreditCard 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. If you additionally want to process the credit card electronically, see Business::OnlinePayment <http://www.420.am/business-onlinepayment/> Original author is Jon Orwant <orwant@tpj.com>, The Perl Journal and MIT Media Lab Current maintainer of 0.38 (a fork of 0.36) is Lisa Shadow <perlsrsbsns@protonmail.com>. Sorry, I had no way to open a pull request because couldn't find Ivan's repo anywhere and there is no contribution information on https://metacpan.org/contributing-to/Business-CreditCard His email is not working. Feel free to merge my commits back into your tree if you find it useful. Current maintainer of 0.36 is Ivan Kohler <ivan-business-creditcard@420.am>. Please don't bother Jon with emails about this module. Lee Lawrence <LeeL@aspin.co.uk>, Neale Banks <neale@lowendale.com.au> and Max Becker <Max.Becker@firstgate.com> contributed support for additional card types. Lee also contributed a working test.pl. Currently supported types VISA MasterCard Maestro Discover American Express MIR Dankort UnionPay JCB RuPay Troy UATP Verve InterPayment enRoute Solo Laser Isracard