| blib/lib/Net/Stripe/Simple.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 28 | 47 | 59.5 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 594 | 17 | 11 | 8 | $args and %$args |
| 607 | 54 | 1 | 16 | &blessed($value) and $value->isa('Net::Stripe::Simple::Data') |
| 55 | 16 | 0 | &blessed($value) and $value->isa('Net::Stripe::Simple::Data') and exists $value->{'id'} | |
| 644 | 17 | 0 | 0 | $args and %$args |
| 717 | 837 | 516 | 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 | 76 | 71 | 0 | $actions->{$action} //= $self->can("_${action}_$name") |
| 221 | 0 | 3 | 1 | $id //= $customer |
| 263 | 1 | 0 | 1 | $id //= $customer |
| 281 | 0 | 3 | 1 | $id //= $customer |
| 323 | 1 | 0 | 0 | $id //= $customer |
| 367 | 1 | 0 | 1 | $id //= $customer |
| 418 | 2 | 0 | 1 | $id //= $customer |
| 684 | 6 | 0 | 0 | $hash->{'error'} // $hash |