Crowdtilt/Business-BalancedPayments — pull request #33 by aanari (2014-06-25 04:27:33+00:00)
Title: Added v1.1 get_card support

Tested in my REPL with the following:

```perl
api->add_contribution;
$bp->get_card_v1_1((pop unpack_rs rset('VaultId')->all)->{vault_id});
```

And here is the output containing `can_credit` and `can_debit`:

```perl
{
cards [
[0] {
address {
city "Balo Alto",
country_code "US",
line1 undef,
line2 undef,
postal_code "None",
state "CA"
},
avs_postal_match undef,
avs_result undef,
avs_street_match undef,
bank_name "BANK OF HAWAII",
brand "MasterCard",
can_credit JSON::XS::Boolean {
Parents JSON::Boolean
public methods (0)
private methods (1) : __ANON__
internals: 0
},
can_debit JSON::XS::Boolean {
Parents JSON::Boolean
public methods (0)
private methods (1) : __ANON__
internals: 1
},
category "other",
created_at "2014-06-25T04:25:17.425479Z",
cvv undef,
cvv_match undef,
cvv_result undef,
expiration_month 12,
expiration_year 2020,
fingerprint "fc4ccd5de54f42a5e75f76fbfde60948440c7a382ee7d21b2bc509ab9cfed788",
href "/cards/CC5xt7kCgFzNAfrYn2cVKsJz",
id "CC5xt7kCgFzNAfrYn2cVKsJz",
is_verified var{cards}[0]{can_credit},
links {
customer "CU5yOksNdBOdApzBlAptMEnT"
},
meta {},
name undef,
number "xxxxxxxxxxxx5100",
type "credit",
updated_at "2014-06-25T04:25:20.292795Z"
}
],
links {
cards.card_holds "/cards/{cards.id}/card_holds",
cards.customer "/customers/{cards.customer}",
cards.debits "/cards/{cards.id}/debits",
cards.disputes "/cards/{cards.id}/disputes"
}
}
```