| blib/lib/Net/Stripe/Simple.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 30 | 50 | 60.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 592 | 16 | 10 | 8 | $args and %$args |
| 605 | 50 | 1 | 16 | &blessed($value) and $value->isa('Net::Stripe::Simple::Data') |
| 51 | 0 | 16 | &blessed($value) and $value->isa('Net::Stripe::Simple::Data') and exists $value->{'id'} | |
| 628 | 29 | 0 | 1 | &blessed($value) && $value->isa(ref &true()) |
| 642 | 15 | 0 | 0 | $args and %$args |
| 715 | 1539 | 742 | 0 | &blessed($ref) and not $rr =~ /^JSON::/ |
| line | l | !l | condition |
|---|---|---|---|
| 36 | 1 | 0 | $Net::Stripe::Simple::VERSION // '0.01' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 32 | 0 | 1 | 0 | ref $class || $class |
| 34 | 1 | 0 | 0 | $version //= $STRIPE_VERSION |
| 56 | 71 | 68 | 0 | $actions->{$action} //= $self->can("_${action}_$name") |
| 256 | 0 | 3 | 1 | $id //= $customer |
| 298 | 1 | 0 | 1 | $id //= $customer |
| 316 | 0 | 3 | 1 | $id //= $customer |
| 358 | 1 | 0 | 0 | $id //= $customer |
| 402 | 1 | 0 | 1 | $id //= $customer |
| 453 | 2 | 0 | 1 | $id //= $customer |
| 682 | 6 | 0 | 0 | $hash->{'error'} // $hash |