X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=test.pl;h=f1ff8da4b1f0e0464c85f585517be1b6c8a5adbc;hb=60766e3c4d0508ebcbccc9ae5074d169f062acd6;hp=72dd9752450799a877d6b9386d12f788857f6fa7;hpb=f08d05d2c88ba79b1bcb9b740837a87992b0b159;p=Business-CreditCard.git

diff --git a/test.pl b/test.pl
index 72dd975..f1ff8da 100644
--- a/test.pl
+++ b/test.pl
@@ -50,6 +50,7 @@ sub test_card_identification{
                 '4111xxxxxxxxxxxx' =>   'VISA card',
                 '6599xxxxxxxxxxxx' =>   'Discover card',
                 '6222xxxxxxxxxxxx' =>   'Discover card', #China Union Pay
+                '6304980000000000004' => 'Laser',
         );
         while( my ($k, $v)=each(%test_table) ){
                 if(cardtype($k) ne $v){