Re^2: Formatting with sprintf

This is a CGI script. I am validating a credit card number ($cardNum) and trying to format it to look like this: 1234-5678-9012-3456. I have confirmed that $cardNum contains a correct, 16-digit value. All attempts have resulted in either null or all zero format (0000-0000-0000-0000). Wish I were smarter....

Comment on Re^2: Formatting with sprintf

Replies are listed 'Best First'.
Re^3: Formatting with sprintf by BillKSmith (Monsignor) on Nov 10, 2015 at 04:50 UTC
I know this is somewhat off-topic. You should consider using the module Regexp::Common::CC for credit card validation. Unfortunately, the SYNOPSIS is incomplete. You have to check the source code for the complete list of supported credit cards. Bill	[reply]
Re^3: Formatting with sprintf by citabriabob (Novice) on Nov 10, 2015 at 02:40 UTC
Someone asked about the version: This is perl, v5.8.8 built for x86_64-linux-thread-multi	[reply]
Re^4: Formatting with sprintf by Anonymous Monk on Nov 10, 2015 at 10:53 UTC
5.8.8 is waaaaay old. That's why `my $CCformatted = $card =~ s/....\K\B/-/gr;` [download] doesn't work, the /r came along in 5.14. `my $CCformatted = join '-', $card =~ /..../g;` [download] should still work.	[reply] [d/l] [select]
Re^5: Formatting with sprintf by citabriabob (Novice) on Nov 10, 2015 at 19:52 UTC
$CCformatted = join '-', $cardNum =~ /..../g; still does not work. I have asked host to update Perl to 5.22.0.	[reply]
Re^6: Formatting with sprintf by LanX (Saint) on Nov 10, 2015 at 22:03 UTC