I could use the module like this:

my $obscure = Business::CreditCard::Obscure->new(cardnum => '123456789
+012')->obscure();
[download]

Since it is very specific, why don't you write your module to export a function, like this:

use Business::CreditCard::Obscure qw(obscure);
my $obscure = obscure(cardnum = '123456789012');
[download]