| line |
true |
false |
branch |
|
31
|
0 |
0 |
if exists $init->{'_dbh'} and $init->{'_dbh'}
|
|
44
|
0 |
0 |
$self->can('as_string') ? :
|
|
62
|
0 |
0 |
if ($self->_is_hash($addr)) { }
|
|
|
0 |
0 |
elsif ($self->_is_object($addr) and $addr->isa('Net::API::Stripe::Address')) { }
|
|
66
|
0 |
0 |
unless exists $addr->{$k} and length $addr->{$k}
|
|
75
|
0 |
0 |
unless exists $addr->{$k} and length $addr->{$k}
|
|
91
|
0 |
0 |
unless length $num
|
|
92
|
0 |
0 |
unless length $p->{'from'}
|
|
97
|
0 |
0 |
if (lc $p->{'from'} eq 'inch') { }
|
|
|
0 |
0 |
elsif (lc $p->{'from'} eq 'cm' or lc $p->{'from'} eq 'centimetre') { }
|
|
|
0 |
0 |
elsif (lc $p->{'from'} eq 'ounce') { }
|
|
|
0 |
0 |
elsif (lc $p->{'from'} eq 'gram') { }
|
|
133
|
0 |
0 |
if exists $self->{$field} and &Scalar::Util::blessed($self->{$field}) and not $self->_is_array($self->{$field})
|
|
142
|
0 |
0 |
if $self->{'_dbh'}
|
|
162
|
0 |
0 |
if $@
|
|
163
|
0 |
0 |
if ($class->isa('Module::Generic::Dynamic')) { }
|
|
165
|
0 |
0 |
@_ ? :
|
|
172
|
0 |
0 |
@_ ? :
|
|
174
|
0 |
0 |
unless defined $o
|
|
176
|
0 |
0 |
if ($Nice::Try::WANTARRAY) { }
|
|
|
0 |
0 |
elsif (defined $Nice::Try::WANTARRAY) { }
|
|
|
0 |
0 |
length $@ ? :
|
|
|
0 |
0 |
if ($Nice::Try::HAS_CATCH)
|
|
|
0 |
0 |
if ($Nice::Try::DIED)
|
|
179
|
0 |
0 |
if ($Nice::Try::WANTARRAY) { }
|
|
|
0 |
0 |
elsif (defined $Nice::Try::WANTARRAY) { }
|
|
|
0 |
0 |
$Nice::Try::WANTARRAY ? :
|
|
|
0 |
0 |
if (defined $Nice::Try::WANTARRAY and not ref $Nice::Try::RETVAL[0] && $Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL'))
|
|
189
|
0 |
0 |
unless exists $ref->{$type}
|
|
198
|
0 |
0 |
if (@_ or not $self->{$field})
|
|
212
|
0 |
0 |
if (want('OBJECT'))
|
|
225
|
0 |
0 |
if (@_)
|
|
237
|
0 |
0 |
if scalar @_ == 1 and not defined $_[0]
|
|
238
|
0 |
0 |
if (@_)
|
|
241
|
0 |
0 |
unless $self->_is_array($ref)
|
|
246
|
0 |
0 |
defined $ref->[$i] ? :
|
|
247
|
0 |
0 |
unless defined $o
|
|
262
|
0 |
0 |
if (@_)
|
|
276
|
0 |
0 |
if (ref $_[0] eq 'HASH') { }
|
|
|
0 |
0 |
elsif (ref $_[0] eq 'ARRAY') { }
|
|
300
|
0 |
0 |
if (@_)
|
|
302
|
0 |
0 |
if (ref $_[0] eq 'HASH' or ref $_[0] eq 'ARRAY') { }
|
|
311
|
0 |
0 |
if (not $self->{$field} and want('OBJECT'))
|
|
323
|
0 |
0 |
if (@_)
|
|
327
|
0 |
0 |
if (defined $str and &Scalar::Util::blessed($str))
|