5 files changed, 68 insertions, 0 deletions

diff --git a/finance/p5-Business-CreditCard/Makefile b/finance/p5-Business-CreditCard/Makefile
new file mode 100644
index 000000000000..085a2ecfc8eb
--- /dev/null
+++ b/finance/p5-Business-CreditCard/Makefile
@@ -0,0 +1,31 @@
+# New ports collection makefile for:	p5-Business-CreditCard
+# Version required:			0.1
+# Date created:				October 20th 1996
+# Whom:	      				James FitzGibbon <jfitz@FreeBSD.org>
+#
+#   $Id$
+#
+
+DISTNAME=	Business-CreditCard-0.1
+PKGNAME=	p5-Business-CreditCard-0.1
+CATEGORIES+=	misc
+MASTER_SITES=	ftp://ftp.digital.com/pub/plan/perl/CPAN/modules/by-module/Business/ \
+		ftp://ftp.cdrom.com/pub/perl/CPAN/modules/by-module/Business/ \
+		ftp://ftp.cis.ufl.edu/pub/perl/CPAN/modules/by-module/Business/ \
+		ftp://ftp.leo.org/pub/comp/programming/languages/perl/CPAN/modules/by-module/Business/ \
+		ftp://ftp.demon.co.uk/pub/mirrors/perl/CPAN/modules/by-module/Business/ \
+		ftp://ftp.lab.kdd.co.jp/lang/perl/CPAN/modules/by-module/Business/
+
+MAINTAINER=	jfitz@FreeBSD.ORG
+
+BUILD_DEPENDS= 	perl5.003:${PORTSDIR}/lang/perl5
+
+NO_BUILD=	YES
+
+do-install:
+		@ ${CP} ${WRKSRC}/CreditCard.pm ${WRKSRC}/CreditCard-0.1.pm
+		@ ${MKDIR} -p ${PREFIX}/lib/perl5/site_perl/Business/
+		@ ${INSTALL_DATA} ${WRKSRC}/CreditCard-0.1.pm ${PREFIX}/lib/perl5/site_perl/Business/
+		@ ln -sf ${PREFIX}/lib/perl5/site_perl/Business/CreditCard-0.1.pm ${PREFIX}/lib/perl5/site_perl/Business/CreditCard.pm
+
+.include <bsd.port.mk>
diff --git a/finance/p5-Business-CreditCard/distinfo b/finance/p5-Business-CreditCard/distinfo
new file mode 100644
index 000000000000..2cd298df8cff
--- /dev/null
+++ b/finance/p5-Business-CreditCard/distinfo
@@ -0,0 +1 @@
+MD5 (Business-CreditCard-0.1.tar.gz) = 42132d39c21faa3a99282b462f8228f0
diff --git a/finance/p5-Business-CreditCard/pkg-comment b/finance/p5-Business-CreditCard/pkg-comment
new file mode 100644
index 000000000000..1c7a024a544d
--- /dev/null
+++ b/finance/p5-Business-CreditCard/pkg-comment
@@ -0,0 +1 @@
+perl5 module to validate/generate credit card checksums/names.
diff --git a/finance/p5-Business-CreditCard/pkg-descr b/finance/p5-Business-CreditCard/pkg-descr
new file mode 100644
index 000000000000..dfcea144d3d0
--- /dev/null
+++ b/finance/p5-Business-CreditCard/pkg-descr
@@ -0,0 +1,32 @@
+       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.  To verify whether a card is real, or whether
+       it's been stolen, or what its balance is, you need a
+       Merchant ID, which gives you access to credit card
+       databases.  The Perl Journal
+       (http://work.media.mit.edu/tpj) has a Merchant ID so that
+       I can accept MasterCard and VISA payments; it comes with
+       the little pushbutton/slide-your-card-through device
+       you've seen in restaurants and stores.  That device
+       calculates the checksum for you, so I don't actually use
+       this module.
+
+       These subroutines will also work if you provide the
+       arguments as numbers instead of strings, e.g.
+       validate(5276440065421319).
diff --git a/finance/p5-Business-CreditCard/pkg-plist b/finance/p5-Business-CreditCard/pkg-plist
new file mode 100644
index 000000000000..8def302b21a1
--- /dev/null
+++ b/finance/p5-Business-CreditCard/pkg-plist
@@ -0,0 +1,3 @@
+lib/perl5/site_perl/Business/CreditCard-0.1.pm
+lib/perl5/site_perl/Business/CreditCard.pm
+@dirrm lib/perl5/site_perl/Business