MV_CREDIT_CARD_INFO_TEMPLATE —
MV_CREDIT_CARD_INFO_TEMPLATE is available in Interchange versions:
4.6.0-5.9.0 (git-head)
Interchange 5.9.0:
Source: lib/Vend/Order.pm
Line 448 (context shows lines 438-452 in build_cc_info():419)
} if(my $num = $cardinfo->{MV_CREDIT_CARD_NUMBER}) { my @quads; $num =~ s/\D//g; @quads = $num =~ m{(\d\d\d\d)(\d\d\d\d)(\d\d\d\d)(\d+)}; $cardinfo->{MV_CREDIT_CARD_QUADS} = join "-", @quads; } $template = $template || $::Variable->{MV_CREDIT_CARD_INFO_TEMPLATE} || join("\t", qw( {MV_CREDIT_CARD_TYPE} {MV_CREDIT_CARD_NUMBER} {MV_CREDIT_CARD_EXP_MONTH}/{MV_CREDIT_CARD_EXP_YEAR}