Branch Coverage

lib/Net/API/Stripe.pm
Criterion Covered Total %
branch 0 1602 0.0


line true false branch
1475 0 0 unless length $self->{'amount'}
1477 0 0 unless length $self->{'description'}
1478 0 0 unless length $self->{'card'}
1479 0 0 unless length $self->{'version'}
1480 0 0 unless length $self->{'key'}
1481 0 0 unless length $self->{'cookie_file'}
1482 0 0 unless length $self->{'browser'}
1483 0 0 unless length $self->{'encode_with_json'}
1484 0 0 unless length $self->{'api_uri'}
1485 0 0 unless length $self->{'file_api_uri'}
1489 0 0 unless length $self->{'temp_dir'}
1492 0 0 unless length $self->{'ignore_unknown_parameters'}
1493 0 0 unless length $self->{'expand'}
1498 0 0 unless $self->SUPER::init(@_)
1499 0 0 if ($self->{'conf_file'})
1502 0 0 if length $json->{'livemode'} and not length $self->{'livemode'}
1503 0 0 unless ($self->{'key'})
1505 0 0 $self->{'livemode'} ? :
1509 0 0 if not $self->{$_} and length $json->{$_}
1515 0 0 unless $self->{'key'}
1516 0 0 unless $self->{'version'}
1518 0 0 $self->{'key'} =~ /_live/ ? :
1526 0 0 if (@_)
1529 0 0 if ($INC{'threads.pm'} and not exists $INC{'forks.pm'})
1533 0 0 if not defined $Nice::Try::WANTARRAY and scalar @Nice::Try::LAST_VAL
0 0 &$Nice::Try::TRY ? :
0 0 if scalar @Nice::Try::VOID
0 0 if ($Nice::Try::WANT eq 'OBJECT') { }
0 0 elsif ($Nice::Try::WANT eq 'CODE') { }
0 0 elsif ($Nice::Try::WANT eq 'HASH') { }
0 0 elsif ($Nice::Try::WANT eq 'ARRAY') { }
0 0 elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
0 0 elsif ($Nice::Try::WANT eq 'GLOB') { }
0 0 elsif ($Nice::Try::WANT eq 'LIST') { }
0 0 elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
0 0 elsif ($Nice::Try::WANT eq 'VOID') { }
0 0 elsif ($Nice::Try::WANT eq 'SCALAR') { }
0 0 if defined $Nice::Try::LAST_VAL
0 0 if ($Nice::Try::WANTARRAY) { }
0 0 elsif (defined $Nice::Try::WANTARRAY) { }
0 0 if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
0 0 length $@ ? :
0 0 unless &Scalar::Util::blessed($@)
0 0 if ($Nice::Try::HAS_CATCH)
0 0 if ($Nice::Try::DIED)
1536 0 0 if not defined $Nice::Try::WANTARRAY and scalar @Nice::Try::LAST_VAL
0 0 &$Nice::Try::CATCH ? :
0 0 if scalar @Nice::Try::VOID
0 0 if ($Nice::Try::WANT eq 'OBJECT') { }
0 0 elsif ($Nice::Try::WANT eq 'CODE') { }
0 0 elsif ($Nice::Try::WANT eq 'HASH') { }
0 0 elsif ($Nice::Try::WANT eq 'ARRAY') { }
0 0 elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
0 0 elsif ($Nice::Try::WANT eq 'GLOB') { }
0 0 elsif ($Nice::Try::WANT eq 'LIST') { }
0 0 elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
0 0 elsif ($Nice::Try::WANT eq 'VOID') { }
0 0 elsif ($Nice::Try::WANT eq 'SCALAR') { }
0 0 if ($Nice::Try::WANTARRAY) { }
0 0 elsif (defined $Nice::Try::WANTARRAY) { }
0 0 if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
0 0 if (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__NEXT__') { }
0 0 elsif (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__LAST__') { }
0 0 elsif (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__REDO__') { }
0 0 if ($Nice::Try::WANT eq 'LIST') { }
0 0 elsif ($Nice::Try::WANT eq 'VOID') { }
0 0 elsif ($Nice::Try::WANT eq 'OBJECT') { }
0 0 elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
0 0 elsif ($Nice::Try::WANT eq 'SCALAR') { }
0 0 elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
0 0 elsif ($Nice::Try::WANT eq 'CODE') { }
0 0 elsif ($Nice::Try::WANT eq 'HASH') { }
0 0 elsif ($Nice::Try::WANT eq 'ARRAY') { }
0 0 elsif ($Nice::Try::WANT eq 'GLOB') { }
0 0 $Nice::Try::WANTARRAY ? :
0 0 if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
0 0 unless (defined $Nice::Try::BREAK)
0 0 if (defined $Nice::Try::WANTARRAY and !&Scalar::Util::blessed($Nice::Try::RETVAL[0]) || &Scalar::Util::blessed($Nice::Try::RETVAL[0]) && !$Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL'))
0 0 if ($Nice::Try::BREAK eq 'next') { }
0 0 elsif ($Nice::Try::BREAK eq 'last') { }
0 0 elsif ($Nice::Try::BREAK eq 'redo') { }
0 0 if (defined $Nice::Try::BREAK)
0 0 scalar @Nice::Try::LAST_VAL > 1 ? :
1538 0 0 if &Scalar::Util::blessed($self->{'api_uri'}) and $self->{'api_uri'}->isa("URI")
1553 0 0 unless exists $Net::API::Stripe::ERROR_CODE_TO_STRING->{$code}
1562 0 0 if (@_)
1566 0 0 if (not $f->exists) { }
0 0 elsif ($f->is_empty) { }
1576 0 0 if ($INC{'threads.pm'} and not exists $INC{'forks.pm'})
1582 0 0 if not defined $Nice::Try::WANTARRAY and scalar @Nice::Try::LAST_VAL
0 0 &$Nice::Try::TRY ? :
0 0 if scalar @Nice::Try::VOID
0 0 if ($Nice::Try::WANT eq 'OBJECT') { }
0 0 elsif ($Nice::Try::WANT eq 'CODE') { }
0 0 elsif ($Nice::Try::WANT eq 'HASH') { }
0 0 elsif ($Nice::Try::WANT eq 'ARRAY') { }
0 0 elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
0 0 elsif ($Nice::Try::WANT eq 'GLOB') { }
0 0 elsif ($Nice::Try::WANT eq 'LIST') { }
0 0 elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
0 0 elsif ($Nice::Try::WANT eq 'VOID') { }
0 0 elsif ($Nice::Try::WANT eq 'SCALAR') { }
0 0 if defined $Nice::Try::LAST_VAL
0 0 if ($Nice::Try::WANTARRAY) { }
0 0 elsif (defined $Nice::Try::WANTARRAY) { }
0 0 if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
0 0 length $@ ? :
0 0 unless &Scalar::Util::blessed($@)
0 0 if ($Nice::Try::HAS_CATCH)
0 0 if ($Nice::Try::DIED)
1585 0 0 if not defined $Nice::Try::WANTARRAY and scalar @Nice::Try::LAST_VAL
0 0 &$Nice::Try::CATCH ? :
0 0 if scalar @Nice::Try::VOID
0 0 if ($Nice::Try::WANT eq 'OBJECT') { }
0 0 elsif ($Nice::Try::WANT eq 'CODE') { }
0 0 elsif ($Nice::Try::WANT eq 'HASH') { }
0 0 elsif ($Nice::Try::WANT eq 'ARRAY') { }
0 0 elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
0 0 elsif ($Nice::Try::WANT eq 'GLOB') { }
0 0 elsif ($Nice::Try::WANT eq 'LIST') { }
0 0 elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
0 0 elsif ($Nice::Try::WANT eq 'VOID') { }
0 0 elsif ($Nice::Try::WANT eq 'SCALAR') { }
0 0 if ($Nice::Try::WANTARRAY) { }
0 0 elsif (defined $Nice::Try::WANTARRAY) { }
0 0 if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
0 0 if (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__NEXT__') { }
0 0 elsif (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__LAST__') { }
0 0 elsif (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__REDO__') { }
0 0 if ($Nice::Try::WANT eq 'LIST') { }
0 0 elsif ($Nice::Try::WANT eq 'VOID') { }
0 0 elsif ($Nice::Try::WANT eq 'OBJECT') { }
0 0 elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
0 0 elsif ($Nice::Try::WANT eq 'SCALAR') { }
0 0 elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
0 0 elsif ($Nice::Try::WANT eq 'CODE') { }
0 0 elsif ($Nice::Try::WANT eq 'HASH') { }
0 0 elsif ($Nice::Try::WANT eq 'ARRAY') { }
0 0 elsif ($Nice::Try::WANT eq 'GLOB') { }
0 0 $Nice::Try::WANTARRAY ? :
0 0 if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
0 0 unless (defined $Nice::Try::BREAK)
0 0 if (defined $Nice::Try::WANTARRAY and !&Scalar::Util::blessed($Nice::Try::RETVAL[0]) || &Scalar::Util::blessed($Nice::Try::RETVAL[0]) && !$Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL'))
0 0 if ($Nice::Try::BREAK eq 'next') { }
0 0 elsif ($Nice::Try::BREAK eq 'last') { }
0 0 elsif ($Nice::Try::BREAK eq 'redo') { }
0 0 if (defined $Nice::Try::BREAK)
0 0 scalar @Nice::Try::LAST_VAL > 1 ? :
1597 0 0 if (@_)
1610 0 0 if $args and ref $args ne "HASH"
1612 0 0 if ($self->_is_object($path) and $path->can('path')) { }
1619 0 0 unless substr($path, 0, 1) eq "/"
1621 0 0 if $args and %$args
1639 0 0 if ($class = $self->_is_object($type)) { }
1647 0 0 unless ($self->_is_class_loaded($class))
1659 0 0 if (@_)
1662 0 0 if ($INC{'threads.pm'} and not exists $INC{'forks.pm'})
1666 0 0 if not defined $Nice::Try::WANTARRAY and scalar @Nice::Try::LAST_VAL
0 0 &$Nice::Try::TRY ? :
0 0 if scalar @Nice::Try::VOID
0 0 if ($Nice::Try::WANT eq 'OBJECT') { }
0 0 elsif ($Nice::Try::WANT eq 'CODE') { }
0 0 elsif ($Nice::Try::WANT eq 'HASH') { }
0 0 elsif ($Nice::Try::WANT eq 'ARRAY') { }
0 0 elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
0 0 elsif ($Nice::Try::WANT eq 'GLOB') { }
0 0 elsif ($Nice::Try::WANT eq 'LIST') { }
0 0 elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
0 0 elsif ($Nice::Try::WANT eq 'VOID') { }
0 0 elsif ($Nice::Try::WANT eq 'SCALAR') { }
0 0 if defined $Nice::Try::LAST_VAL
0 0 if ($Nice::Try::WANTARRAY) { }
0 0 elsif (defined $Nice::Try::WANTARRAY) { }
0 0 if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
0 0 length $@ ? :
0 0 unless &Scalar::Util::blessed($@)
0 0 if ($Nice::Try::HAS_CATCH)
0 0 if ($Nice::Try::DIED)
1669 0 0 if not defined $Nice::Try::WANTARRAY and scalar @Nice::Try::LAST_VAL
0 0 &$Nice::Try::CATCH ? :
0 0 if scalar @Nice::Try::VOID
0 0 if ($Nice::Try::WANT eq 'OBJECT') { }
0 0 elsif ($Nice::Try::WANT eq 'CODE') { }
0 0 elsif ($Nice::Try::WANT eq 'HASH') { }
0 0 elsif ($Nice::Try::WANT eq 'ARRAY') { }
0 0 elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
0 0 elsif ($Nice::Try::WANT eq 'GLOB') { }
0 0 elsif ($Nice::Try::WANT eq 'LIST') { }
0 0 elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
0 0 elsif ($Nice::Try::WANT eq 'VOID') { }
0 0 elsif ($Nice::Try::WANT eq 'SCALAR') { }
0 0 if ($Nice::Try::WANTARRAY) { }
0 0 elsif (defined $Nice::Try::WANTARRAY) { }
0 0 if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
0 0 if (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__NEXT__') { }
0 0 elsif (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__LAST__') { }
0 0 elsif (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__REDO__') { }
0 0 if ($Nice::Try::WANT eq 'LIST') { }
0 0 elsif ($Nice::Try::WANT eq 'VOID') { }
0 0 elsif ($Nice::Try::WANT eq 'OBJECT') { }
0 0 elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
0 0 elsif ($Nice::Try::WANT eq 'SCALAR') { }
0 0 elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
0 0 elsif ($Nice::Try::WANT eq 'CODE') { }
0 0 elsif ($Nice::Try::WANT eq 'HASH') { }
0 0 elsif ($Nice::Try::WANT eq 'ARRAY') { }
0 0 elsif ($Nice::Try::WANT eq 'GLOB') { }
0 0 $Nice::Try::WANTARRAY ? :
0 0 if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
0 0 unless (defined $Nice::Try::BREAK)
0 0 if (defined $Nice::Try::WANTARRAY and !&Scalar::Util::blessed($Nice::Try::RETVAL[0]) || &Scalar::Util::blessed($Nice::Try::RETVAL[0]) && !$Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL'))
0 0 if ($Nice::Try::BREAK eq 'next') { }
0 0 elsif ($Nice::Try::BREAK eq 'last') { }
0 0 elsif ($Nice::Try::BREAK eq 'redo') { }
0 0 if (defined $Nice::Try::BREAK)
0 0 scalar @Nice::Try::LAST_VAL > 1 ? :
1671 0 0 if &Scalar::Util::blessed($self->{'file_api_uri'}) and $self->{'file_api_uri'}->isa("URI")
1687 0 0 if $args and ref $args ne "HASH"
1689 0 0 if (not exists $args->{'expand'} and $expand eq 'all' || $expand =~ /^\d+$/ && $expand > 2 or exists $args->{'expand'} and $args->{'expand'} eq 'all' || $args->{'expand'} =~ /^\d+$/ && $args->{'expand'} > 2)
1707 0 0 exists $args->{'_file_api'} ? :
1708 0 0 if ($self->_is_object($path) and $path->can('path')) { }
1715 0 0 unless substr($path, 0, 1) eq "/"
1717 0 0 if $args and %$args
1726 0 0 if $self->{'ua'}
1730 0 0 $self->debug > 3 ? :
1736 0 0 if (defined $browser and length $browser)
1741 0 0 if (defined $cookie_file and length $cookie_file)
1767 0 0 if (@_)
1785 0 0 if $args and ref $args ne "HASH"
1787 0 0 if ($self->_is_object($path) and $path->can('path')) { }
1794 0 0 unless substr($path, 0, 1) eq "/"
1799 0 0 if (exists $args->{'idempotency'})
1801 0 0 unless length $args->{'idempotency'}
1804 0 0 $args ? :
1820 0 0 if $args and ref $args ne "HASH"
1822 0 0 if ($self->_is_object($path) and $path->can('path')) { }
1829 0 0 unless substr($path, 0, 1) eq "/"
1834 0 0 if (exists $args->{'idempotency'})
1836 0 0 unless length $args->{'idempotency'}
1845 0 0 if ($ref->{'filename'}) { }
1856 0 0 $ref->{'type'} ? :
0 0 $ref->{'encoding'} ? :
1869 0 0 $ref->{'type'} eq 'text/plain' ? :
0 0 $ref->{'encoding'} ? :
1884 0 0 if @_ and ref $_[0] eq "HASH"
1885 0 0 unless $opts->{'secret'}
1886 0 0 unless $opts->{'signature'}
1887 0 0 unless length $opts->{'payload'}
1894 0 0 unless &Encode::is_utf8($payload)
1900 0 0 unless length $sig
1908 0 0 unless exists $q->{'t'}
1909 0 0 unless length $q->{'t'}
1910 0 0 unless exists $q->{'v1'}
1911 0 0 unless length $q->{'v1'}
1913 0 0 unless $q->{'t'} =~ /^\d+$/
1915 0 0 unless $q->{'v1'} =~ /^[a-z0-9]{64}$/
1917 0 0 if ($INC{'threads.pm'} and not exists $INC{'forks.pm'})
1921 0 0 if not defined $Nice::Try::WANTARRAY and scalar @Nice::Try::LAST_VAL
0 0 &$Nice::Try::TRY ? :
0 0 if scalar @Nice::Try::VOID
0 0 if ($Nice::Try::WANT eq 'OBJECT') { }
0 0 elsif ($Nice::Try::WANT eq 'CODE') { }
0 0 elsif ($Nice::Try::WANT eq 'HASH') { }
0 0 elsif ($Nice::Try::WANT eq 'ARRAY') { }
0 0 elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
0 0 elsif ($Nice::Try::WANT eq 'GLOB') { }
0 0 elsif ($Nice::Try::WANT eq 'LIST') { }
0 0 elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
0 0 elsif ($Nice::Try::WANT eq 'VOID') { }
0 0 elsif ($Nice::Try::WANT eq 'SCALAR') { }
0 0 if defined $Nice::Try::LAST_VAL
0 0 if ($Nice::Try::WANTARRAY) { }
0 0 elsif (defined $Nice::Try::WANTARRAY) { }
0 0 if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
0 0 length $@ ? :
0 0 unless &Scalar::Util::blessed($@)
0 0 if ($Nice::Try::HAS_CATCH)
0 0 if ($Nice::Try::DIED)
1924 0 0 if not defined $Nice::Try::WANTARRAY and scalar @Nice::Try::LAST_VAL
0 0 &$Nice::Try::CATCH ? :
0 0 if scalar @Nice::Try::VOID
0 0 if ($Nice::Try::WANT eq 'OBJECT') { }
0 0 elsif ($Nice::Try::WANT eq 'CODE') { }
0 0 elsif ($Nice::Try::WANT eq 'HASH') { }
0 0 elsif ($Nice::Try::WANT eq 'ARRAY') { }
0 0 elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
0 0 elsif ($Nice::Try::WANT eq 'GLOB') { }
0 0 elsif ($Nice::Try::WANT eq 'LIST') { }
0 0 elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
0 0 elsif ($Nice::Try::WANT eq 'VOID') { }
0 0 elsif ($Nice::Try::WANT eq 'SCALAR') { }
0 0 if ($Nice::Try::WANTARRAY) { }
0 0 elsif (defined $Nice::Try::WANTARRAY) { }
0 0 if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
0 0 if (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__NEXT__') { }
0 0 elsif (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__LAST__') { }
0 0 elsif (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__REDO__') { }
0 0 if ($Nice::Try::WANT eq 'LIST') { }
0 0 elsif ($Nice::Try::WANT eq 'VOID') { }
0 0 elsif ($Nice::Try::WANT eq 'OBJECT') { }
0 0 elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
0 0 elsif ($Nice::Try::WANT eq 'SCALAR') { }
0 0 elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
0 0 elsif ($Nice::Try::WANT eq 'CODE') { }
0 0 elsif ($Nice::Try::WANT eq 'HASH') { }
0 0 elsif ($Nice::Try::WANT eq 'ARRAY') { }
0 0 elsif ($Nice::Try::WANT eq 'GLOB') { }
0 0 $Nice::Try::WANTARRAY ? :
0 0 if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
0 0 unless (defined $Nice::Try::BREAK)
0 0 if (defined $Nice::Try::WANTARRAY and !&Scalar::Util::blessed($Nice::Try::RETVAL[0]) || &Scalar::Util::blessed($Nice::Try::RETVAL[0]) && !$Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL'))
0 0 if ($Nice::Try::BREAK eq 'next') { }
0 0 elsif ($Nice::Try::BREAK eq 'last') { }
0 0 elsif ($Nice::Try::BREAK eq 'redo') { }
0 0 if (defined $Nice::Try::BREAK)
0 0 scalar @Nice::Try::LAST_VAL > 1 ? :
1929 0 0 if $expect_sign ne $q->{'v1'}
1931 0 0 if $time_diff < 0
1932 0 0 if $time_diff >= $max_time_spread
1942 0 0 if @_ and ref $_[0] eq "HASH"
1943 0 0 unless $opts->{'ip'}
1958 0 0 unless ($ip->overlaps($stripe_ip_object) == $Net::IP::IP_NO_OVERLAP)
1963 0 0 if ($opts->{'ignore_ip'}) { }
15867 0 0 if ref $args ne "HASH"
15868 0 0 if (ref $args->{'expand'} eq "ARRAY")
15873 0 0 if substr($args->{'expand'}[$i], 0, 5) ne "data."
15876 0 0 if scalar @$path <= $EXPAND_MAX_DEPTH
15888 0 0 if @_ and ref $_[0] eq "HASH"
15889 0 0 unless $opts->{'seen'}
15891 0 0 if ($self->_is_object($this)) { }
0 0 elsif (ref $this eq 'HASH') { }
15893 0 0 if $this->can("as_hash")
15900 0 0 if $opts->{'seen'}{$ref_addr}
15905 0 0 if (ref $this->{$k} eq 'HASH' or $self->_is_object($this->{$k})) { }
0 0 elsif (ref $this->{$k} eq 'ARRAY') { }
0 0 elsif (length "$this->{$k}") { }
15908 0 0 if scalar keys %$rv
15915 0 0 if (ref $that eq "HASH" or $self->_is_object($that))
15918 0 0 if scalar keys %$rv
15921 0 0 if scalar @$new
15954 0 0 unless (exists $mirror->{$k})
15960 0 0 if ref $hash->{$k} eq "HASH"
15962 0 0 if (ref $hash->{$k} eq "HASH" and ref $mirror->{$k} eq "HASH" and ++$seen->{$addr} == 1)
15967 0 0 exists $required->{$k} ? :
15976 0 0 if $k eq "_required"
15978 0 0 if (ref $mirror->{$k} eq 'HASH') { }
15980 0 0 if (not exists $hash->{$k} and $mirror->{$k}{'_required'})
15987 0 0 if (not exists $hash->{$k} && length $hash->{$k} and $mirror->{$k})
16000 0 0 if $k eq "expand" or $k eq "expandable" or substr($k, 0, 1) eq "_"
16018 0 0 if (ref $dict eq 'HASH') { }
0 0 elsif (ref $dict eq 'CODE') { }
16095 0 0 if (defined $dict->{'required'} and $dict->{'required'} and not exists $args->{$k}) { }
0 0 elsif (not defined $args->{$k} && length $args->{$k}) { }
0 0 elsif ($pkg = $self->_is_object($args->{$k}) and $dict->{'package'} and $dict->{'package'} ne $pkg) { }
0 0 elsif ($dict->{'re'} and ref $dict->{'re'} eq 'Regexp' and not $args->{$k} =~ /$dict->{'re'}/) { }
0 0 elsif (defined $dict->{'type'} and $dict->{'type'} and $dict->{'type'} eq 'scalar' && ref $args->{$k} || $dict->{'type'} ne 'scalar' && ref $args->{$k} && lc ref $args->{$k} ne $dict->{'type'}) { }
0 0 elsif (defined $dict->{'type'} and $dict->{'type'} eq 'boolean' and defined $args->{$k} and length $args->{$k}) { }
0 0 elsif (defined $dict->{'type'} and $dict->{'type'} eq 'integer') { }
0 0 elsif (defined $dict->{'type'} and $dict->{'type'} eq 'number' || $dict->{'type'} eq 'decimal' || $dict->{'type'} eq 'float' || $dict->{'type'} eq 'double') { }
0 0 elsif (defined $dict->{'type'} and $dict->{'type'} eq 'date' || $dict->{'type'} eq 'datetime' || $dict->{'type'} eq 'timestamp') { }
16130 0 0 $args->{$k} eq 'true' || $args->{$k} ne 'false' && $args->{$k} ? :
16135 0 0 unless $args->{$k} =~ /^[-+]?\d+$/
16145 0 0 unless $args->{$k} =~ /^$Net::API::Stripe::RE{'num'}{'real'}$/
16154 0 0 unless ($self->_is_object($args->{$k}) and $args->{$k}->isa("DateTime"))
16156 0 0 $dict->{'time_zone'} ? :
16158 0 0 if ($dict->{'type'} eq 'date' and $args->{$k} =~ /^(?<year>\d{4})[\.|\-](?<month>\d{1,2})[\.|\-](?<day>\d{1,2})$/) { }
0 0 elsif ($dict->{'type'} eq 'datetime' and $args->{$k} =~ /^(?<year>\d{4})[\.|\-](?<month>\d{1,2})[\.|\-](?<day>\d{1,2})[T|[:blank:]]+(?<hour>\d{1,2}):(?<minute>\d{1,2}):(?<second>\d{1,2})$/) { }
0 0 elsif ($args->{$k} =~ /^\d+$/) { }
16161 0 0 if ($INC{'threads.pm'} and not exists $INC{'forks.pm'})
16174 0 0 if not defined $Nice::Try::WANTARRAY and scalar @Nice::Try::LAST_VAL
0 0 &$Nice::Try::TRY ? :
0 0 if scalar @Nice::Try::VOID
0 0 if ($Nice::Try::WANT eq 'OBJECT') { }
0 0 elsif ($Nice::Try::WANT eq 'CODE') { }
0 0 elsif ($Nice::Try::WANT eq 'HASH') { }
0 0 elsif ($Nice::Try::WANT eq 'ARRAY') { }
0 0 elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
0 0 elsif ($Nice::Try::WANT eq 'GLOB') { }
0 0 elsif ($Nice::Try::WANT eq 'LIST') { }
0 0 elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
0 0 elsif ($Nice::Try::WANT eq 'VOID') { }
0 0 elsif ($Nice::Try::WANT eq 'SCALAR') { }
0 0 if defined $Nice::Try::LAST_VAL
0 0 if ($Nice::Try::WANTARRAY) { }
0 0 elsif (defined $Nice::Try::WANTARRAY) { }
0 0 if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
0 0 length $@ ? :
0 0 unless &Scalar::Util::blessed($@)
0 0 if ($Nice::Try::HAS_CATCH)
0 0 if ($Nice::Try::DIED)
16177 0 0 if not defined $Nice::Try::WANTARRAY and scalar @Nice::Try::LAST_VAL
0 0 &$Nice::Try::CATCH ? :
0 0 if scalar @Nice::Try::VOID
0 0 if ($Nice::Try::WANT eq 'OBJECT') { }
0 0 elsif ($Nice::Try::WANT eq 'CODE') { }
0 0 elsif ($Nice::Try::WANT eq 'HASH') { }
0 0 elsif ($Nice::Try::WANT eq 'ARRAY') { }
0 0 elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
0 0 elsif ($Nice::Try::WANT eq 'GLOB') { }
0 0 elsif ($Nice::Try::WANT eq 'LIST') { }
0 0 elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
0 0 elsif ($Nice::Try::WANT eq 'VOID') { }
0 0 elsif ($Nice::Try::WANT eq 'SCALAR') { }
0 0 if ($Nice::Try::WANTARRAY) { }
0 0 elsif (defined $Nice::Try::WANTARRAY) { }
0 0 if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
0 0 if (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__NEXT__') { }
0 0 elsif (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__LAST__') { }
0 0 elsif (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__REDO__') { }
0 0 if ($Nice::Try::WANT eq 'LIST') { }
0 0 elsif ($Nice::Try::WANT eq 'VOID') { }
0 0 elsif ($Nice::Try::WANT eq 'OBJECT') { }
0 0 elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
0 0 elsif ($Nice::Try::WANT eq 'SCALAR') { }
0 0 elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
0 0 elsif ($Nice::Try::WANT eq 'CODE') { }
0 0 elsif ($Nice::Try::WANT eq 'HASH') { }
0 0 elsif ($Nice::Try::WANT eq 'ARRAY') { }
0 0 elsif ($Nice::Try::WANT eq 'GLOB') { }
0 0 $Nice::Try::WANTARRAY ? :
0 0 if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
0 0 unless (defined $Nice::Try::BREAK)
0 0 if (defined $Nice::Try::WANTARRAY and !&Scalar::Util::blessed($Nice::Try::RETVAL[0]) || &Scalar::Util::blessed($Nice::Try::RETVAL[0]) && !$Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL'))
0 0 if ($Nice::Try::BREAK eq 'next') { }
0 0 elsif ($Nice::Try::BREAK eq 'last') { }
0 0 elsif ($Nice::Try::BREAK eq 'redo') { }
0 0 if (defined $Nice::Try::BREAK)
0 0 scalar @Nice::Try::LAST_VAL > 1 ? :
16182 0 0 if ($INC{'threads.pm'} and not exists $INC{'forks.pm'})
16195 0 0 if not defined $Nice::Try::WANTARRAY and scalar @Nice::Try::LAST_VAL
0 0 &$Nice::Try::TRY ? :
0 0 if scalar @Nice::Try::VOID
0 0 if ($Nice::Try::WANT eq 'OBJECT') { }
0 0 elsif ($Nice::Try::WANT eq 'CODE') { }
0 0 elsif ($Nice::Try::WANT eq 'HASH') { }
0 0 elsif ($Nice::Try::WANT eq 'ARRAY') { }
0 0 elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
0 0 elsif ($Nice::Try::WANT eq 'GLOB') { }
0 0 elsif ($Nice::Try::WANT eq 'LIST') { }
0 0 elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
0 0 elsif ($Nice::Try::WANT eq 'VOID') { }
0 0 elsif ($Nice::Try::WANT eq 'SCALAR') { }
0 0 if defined $Nice::Try::LAST_VAL
0 0 if ($Nice::Try::WANTARRAY) { }
0 0 elsif (defined $Nice::Try::WANTARRAY) { }
0 0 if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
0 0 length $@ ? :
0 0 unless &Scalar::Util::blessed($@)
0 0 if ($Nice::Try::HAS_CATCH)
0 0 if ($Nice::Try::DIED)
16198 0 0 if not defined $Nice::Try::WANTARRAY and scalar @Nice::Try::LAST_VAL
0 0 &$Nice::Try::CATCH ? :
0 0 if scalar @Nice::Try::VOID
0 0 if ($Nice::Try::WANT eq 'OBJECT') { }
0 0 elsif ($Nice::Try::WANT eq 'CODE') { }
0 0 elsif ($Nice::Try::WANT eq 'HASH') { }
0 0 elsif ($Nice::Try::WANT eq 'ARRAY') { }
0 0 elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
0 0 elsif ($Nice::Try::WANT eq 'GLOB') { }
0 0 elsif ($Nice::Try::WANT eq 'LIST') { }
0 0 elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
0 0 elsif ($Nice::Try::WANT eq 'VOID') { }
0 0 elsif ($Nice::Try::WANT eq 'SCALAR') { }
0 0 if ($Nice::Try::WANTARRAY) { }
0 0 elsif (defined $Nice::Try::WANTARRAY) { }
0 0 if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
0 0 if (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__NEXT__') { }
0 0 elsif (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__LAST__') { }
0 0 elsif (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__REDO__') { }
0 0 if ($Nice::Try::WANT eq 'LIST') { }
0 0 elsif ($Nice::Try::WANT eq 'VOID') { }
0 0 elsif ($Nice::Try::WANT eq 'OBJECT') { }
0 0 elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
0 0 elsif ($Nice::Try::WANT eq 'SCALAR') { }
0 0 elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
0 0 elsif ($Nice::Try::WANT eq 'CODE') { }
0 0 elsif ($Nice::Try::WANT eq 'HASH') { }
0 0 elsif ($Nice::Try::WANT eq 'ARRAY') { }
0 0 elsif ($Nice::Try::WANT eq 'GLOB') { }
0 0 $Nice::Try::WANTARRAY ? :
0 0 if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
0 0 unless (defined $Nice::Try::BREAK)
0 0 if (defined $Nice::Try::WANTARRAY and !&Scalar::Util::blessed($Nice::Try::RETVAL[0]) || &Scalar::Util::blessed($Nice::Try::RETVAL[0]) && !$Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL'))
0 0 if ($Nice::Try::BREAK eq 'next') { }
0 0 elsif ($Nice::Try::BREAK eq 'last') { }
0 0 elsif ($Nice::Try::BREAK eq 'redo') { }
0 0 if (defined $Nice::Try::BREAK)
0 0 scalar @Nice::Try::LAST_VAL > 1 ? :
16202 0 0 if ($INC{'threads.pm'} and not exists $INC{'forks.pm'})
16209 0 0 if not defined $Nice::Try::WANTARRAY and scalar @Nice::Try::LAST_VAL
0 0 &$Nice::Try::TRY ? :
0 0 if scalar @Nice::Try::VOID
0 0 if ($Nice::Try::WANT eq 'OBJECT') { }
0 0 elsif ($Nice::Try::WANT eq 'CODE') { }
0 0 elsif ($Nice::Try::WANT eq 'HASH') { }
0 0 elsif ($Nice::Try::WANT eq 'ARRAY') { }
0 0 elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
0 0 elsif ($Nice::Try::WANT eq 'GLOB') { }
0 0 elsif ($Nice::Try::WANT eq 'LIST') { }
0 0 elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
0 0 elsif ($Nice::Try::WANT eq 'VOID') { }
0 0 elsif ($Nice::Try::WANT eq 'SCALAR') { }
0 0 if defined $Nice::Try::LAST_VAL
0 0 if ($Nice::Try::WANTARRAY) { }
0 0 elsif (defined $Nice::Try::WANTARRAY) { }
0 0 if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
0 0 length $@ ? :
0 0 unless &Scalar::Util::blessed($@)
0 0 if ($Nice::Try::HAS_CATCH)
0 0 if ($Nice::Try::DIED)
16212 0 0 if not defined $Nice::Try::WANTARRAY and scalar @Nice::Try::LAST_VAL
0 0 &$Nice::Try::CATCH ? :
0 0 if scalar @Nice::Try::VOID
0 0 if ($Nice::Try::WANT eq 'OBJECT') { }
0 0 elsif ($Nice::Try::WANT eq 'CODE') { }
0 0 elsif ($Nice::Try::WANT eq 'HASH') { }
0 0 elsif ($Nice::Try::WANT eq 'ARRAY') { }
0 0 elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
0 0 elsif ($Nice::Try::WANT eq 'GLOB') { }
0 0 elsif ($Nice::Try::WANT eq 'LIST') { }
0 0 elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
0 0 elsif ($Nice::Try::WANT eq 'VOID') { }
0 0 elsif ($Nice::Try::WANT eq 'SCALAR') { }
0 0 if ($Nice::Try::WANTARRAY) { }
0 0 elsif (defined $Nice::Try::WANTARRAY) { }
0 0 if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
0 0 if (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__NEXT__') { }
0 0 elsif (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__LAST__') { }
0 0 elsif (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__REDO__') { }
0 0 if ($Nice::Try::WANT eq 'LIST') { }
0 0 elsif ($Nice::Try::WANT eq 'VOID') { }
0 0 elsif ($Nice::Try::WANT eq 'OBJECT') { }
0 0 elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
0 0 elsif ($Nice::Try::WANT eq 'SCALAR') { }
0 0 elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
0 0 elsif ($Nice::Try::WANT eq 'CODE') { }
0 0 elsif ($Nice::Try::WANT eq 'HASH') { }
0 0 elsif ($Nice::Try::WANT eq 'ARRAY') { }
0 0 elsif ($Nice::Try::WANT eq 'GLOB') { }
0 0 $Nice::Try::WANTARRAY ? :
0 0 if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
0 0 unless (defined $Nice::Try::BREAK)
0 0 if (defined $Nice::Try::WANTARRAY and !&Scalar::Util::blessed($Nice::Try::RETVAL[0]) || &Scalar::Util::blessed($Nice::Try::RETVAL[0]) && !$Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL'))
0 0 if ($Nice::Try::BREAK eq 'next') { }
0 0 elsif ($Nice::Try::BREAK eq 'last') { }
0 0 elsif ($Nice::Try::BREAK eq 'redo') { }
0 0 if (defined $Nice::Try::BREAK)
0 0 scalar @Nice::Try::LAST_VAL > 1 ? :
16214 0 0 if ($dt)
16216 0 0 $dict->{'pattern'} ? :
16231 0 0 if $res
16235 0 0 unless length $args->{'expand'}
16236 0 0 if (exists $args->{'expand'}) { }
16240 0 0 if ($args->{'expand'} eq "all" or $args->{'expand'} =~ /^\d+$/)
16243 0 0 if ($args->{'expand'} =~ /^\d+$/) { }
16251 0 0 if (exists $okParams->{'expandable'} and exists $okParams->{'expandable'}{'allowed'} and ref $okParams->{'expandable'}{'allowed'} eq 'ARRAY') { }
16263 0 0 if ref $args->{'expand'} ne "ARRAY"
16264 0 0 if (scalar @{$args->{'expand'};} and exists $okParams->{'expandable'}) { }
0 0 elsif (not exists $okParams->{'expandable'}) { }
16266 0 0 if ref $okParams->{'expandable'} ne "HASH"
16267 0 0 unless exists $okParams->{'expandable'}{'allowed'}
16270 0 0 if (not $no_need_to_check) { }
0 0 elsif ($depth) { }
16272 0 0 if (scalar @$expandable) { }
16274 0 0 if ref $expandable ne "ARRAY"
16277 0 0 $okParams->{'expandable'}{'data_prefix_is_ok'} ? :
16280 0 0 unless ($k =~ /$re/)
16293 0 0 length $depth ? :
16299 0 0 if (scalar @$path_parts > $max_depth)
16306 0 0 if scalar @$errExpandables
16310 0 0 if scalar @{$args->{'expand'};}
16325 0 0 if ref $required ne "ARRAY"
16327 0 0 if ref $args ne "HASH"
16331 0 0 unless exists $args->{$f} and length $args->{$f}
16344 0 0 if ref $args ne "HASH" and ref $args ne "Module::Generic::Hash" and not $self->_is_object($args)
16345 0 0 unless exists $Net::API::Stripe::EXPANDABLES_BY_CLASS->{$class}
16347 0 0 if ref $ref ne "HASH"
16350 0 0 if (index($p, '.') != -1) { }
16360 0 0 if ($self->_is_object($obj)) { }
0 0 elsif (ref $obj eq 'HASH' or ref $obj eq 'Module::Generic::Hash') { }
16363 0 0 unless (defined(my $code = $obj->can($prop)))
16374 0 0 unless length $this
16378 0 0 if ($self->_is_object($this)) { }
0 0 elsif (ref $this eq 'HASH' or ref $this eq 'Module::Generic::Hash') { }
16381 0 0 if ($i == $#parts)
16383 0 0 if ($type eq 'object') { }
0 0 elsif ($type eq 'hash') { }
16397 0 0 if ($i == $#parts)
16399 0 0 if ($type eq 'object') { }
0 0 elsif ($type eq 'hash') { }
16414 0 0 if ($self->_is_object($args)) { }
0 0 elsif (ref $args eq 'HASH' or ref $args eq 'Module::Generic::Hash') { }
16417 0 0 unless length $this
16418 0 0 if ($self->_is_object($this)) { }
0 0 elsif (ref $this eq 'HASH' or ref $this eq 'Module::Generic::Hash') { }
16430 0 0 unless length $this
16431 0 0 if ($self->_is_object($this)) { }
0 0 elsif (ref $this eq 'HASH' or ref $this eq 'Module::Generic::Hash') { }
16456 0 0 if (ref $this->{$k} eq 'HASH') { }
0 0 elsif ($self->_is_object($this->{$k}) and $this->{$k}->isa('Module::Generic::Boolean')) { }
16459 0 0 if ++$seen->{$addr} > 1
16464 0 0 $this->{$k} ? :
16475 0 0 if ($self->{'_encode_with_json'})
16486 0 0 if ($type eq 'hash' or $ref eq 'Module::Generic::Hash') { }
0 0 elsif ($type eq 'array' or $ref eq 'Module::Generic::Array') { }
0 0 elsif (ref $data eq 'JSON::PP::Boolean' or ref $data eq 'Module::Generic::Boolean') { }
0 0 elsif (ref $data eq 'SCALAR' and $$data == 1 || $$data == 0) { }
0 0 elsif ($ref and &Scalar::Util::reftype($data) eq 'SCALAR') { }
0 0 elsif ($type eq 'datetime') { }
0 0 elsif ($type) { }
16492 0 0 if ($pkg and $pkg =~ /^Net::API::Stripe/ and $data->{$k}->can("id") and $data->{$k}->id)
16499 0 0 $pref ? :
16508 0 0 $pref ? :
16514 0 0 $data ? :
16518 0 0 $$data ? :
16548 0 0 if scalar @_ and ref $_[-1] eq "HASH"
16552 0 0 unless length $param
16553 0 0 unless length $param->{'encoding'}
16554 0 0 unless (exists $ref->{$key})
16559 0 0 if length $param->{'filename'}
16560 0 0 if length $param->{'type'}
16561 0 0 if substr($this->{'type'}, 0, 4) eq "text"
16562 0 0 if ($param->{'encoding'}) { }
16564 0 0 if ($param->{'encoding'} eq 'qp' or $param->{'encoding'} eq 'quoted-printable') { }
0 0 elsif ($param->{'encoding'} eq 'base64') { }
16591 0 0 if ($type eq 'hash') { }
0 0 elsif ($type eq 'array') { }
0 0 elsif (ref $data eq 'JSON::PP::Boolean' or ref $data eq 'Module::Generic::Boolean') { }
0 0 elsif (ref $data eq 'SCALAR' and $$data == 1 || $$data == 0) { }
0 0 elsif ($type) { }
16599 0 0 if ($pkg and $pkg =~ /^Net::API::Stripe/ and $data->{$k}->can('id') and $data->{$k}->id) { }
0 0 elsif (ref $data->{$k} eq 'HASH' and exists $data->{$k}{'_filepath'}) { }
16610 0 0 unless length $data->{$k}{'_filepath'}
16613 0 0 if (not $this_file->exists) { }
0 0 elsif (not $this_file->can_read) { }
16630 0 0 $pref ? :
16638 0 0 $pref ? :
16643 0 0 $data ? :
16647 0 0 $$data ? :
16666 0 0 if not scalar @_ or scalar @_ == 1 and not defined $_[0]
16668 0 0 if $self->_is_object($_[0])
16669 0 0 @_ == 1 ? :
0 0 ref $_[0] eq 'HASH' ? :
16678 0 0 if ($self->_is_object($_[0]) and $_[0]->isa($class)) { }
16697 0 0 unless length $action
16698 0 0 if ref $allowed ne "ARRAY"
16699 0 0 unless scalar @$allowed
16700 0 0 if ($action eq 'remove') { }
0 0 elsif ($action eq 'add') { }
16708 0 0 unless (scalar grep(/^$action$/, @$allowed))
16713 0 0 unless $meth
16721 0 0 if exists $self->{$name} and &Scalar::Util::blessed($self->{$name})
16724 0 0 if ($INC{'threads.pm'} and not exists $INC{'forks.pm'})
16729 0 0 if $@
16736 0 0 if not defined $Nice::Try::WANTARRAY and scalar @Nice::Try::LAST_VAL
0 0 &$Nice::Try::TRY ? :
0 0 if scalar @Nice::Try::VOID
0 0 if ($Nice::Try::WANT eq 'OBJECT') { }
0 0 elsif ($Nice::Try::WANT eq 'CODE') { }
0 0 elsif ($Nice::Try::WANT eq 'HASH') { }
0 0 elsif ($Nice::Try::WANT eq 'ARRAY') { }
0 0 elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
0 0 elsif ($Nice::Try::WANT eq 'GLOB') { }
0 0 elsif ($Nice::Try::WANT eq 'LIST') { }
0 0 elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
0 0 elsif ($Nice::Try::WANT eq 'VOID') { }
0 0 elsif ($Nice::Try::WANT eq 'SCALAR') { }
0 0 if defined $Nice::Try::LAST_VAL
0 0 if ($Nice::Try::WANTARRAY) { }
0 0 elsif (defined $Nice::Try::WANTARRAY) { }
0 0 if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
0 0 length $@ ? :
0 0 unless &Scalar::Util::blessed($@)
0 0 if ($Nice::Try::HAS_CATCH)
0 0 if ($Nice::Try::DIED)
16739 0 0 if not defined $Nice::Try::WANTARRAY and scalar @Nice::Try::LAST_VAL
0 0 &$Nice::Try::CATCH ? :
0 0 if scalar @Nice::Try::VOID
0 0 if ($Nice::Try::WANT eq 'OBJECT') { }
0 0 elsif ($Nice::Try::WANT eq 'CODE') { }
0 0 elsif ($Nice::Try::WANT eq 'HASH') { }
0 0 elsif ($Nice::Try::WANT eq 'ARRAY') { }
0 0 elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
0 0 elsif ($Nice::Try::WANT eq 'GLOB') { }
0 0 elsif ($Nice::Try::WANT eq 'LIST') { }
0 0 elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
0 0 elsif ($Nice::Try::WANT eq 'VOID') { }
0 0 elsif ($Nice::Try::WANT eq 'SCALAR') { }
0 0 if ($Nice::Try::WANTARRAY) { }
0 0 elsif (defined $Nice::Try::WANTARRAY) { }
0 0 if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
0 0 if (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__NEXT__') { }
0 0 elsif (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__LAST__') { }
0 0 elsif (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__REDO__') { }
0 0 if ($Nice::Try::WANT eq 'LIST') { }
0 0 elsif ($Nice::Try::WANT eq 'VOID') { }
0 0 elsif ($Nice::Try::WANT eq 'OBJECT') { }
0 0 elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
0 0 elsif ($Nice::Try::WANT eq 'SCALAR') { }
0 0 elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
0 0 elsif ($Nice::Try::WANT eq 'CODE') { }
0 0 elsif ($Nice::Try::WANT eq 'HASH') { }
0 0 elsif ($Nice::Try::WANT eq 'ARRAY') { }
0 0 elsif ($Nice::Try::WANT eq 'GLOB') { }
0 0 $Nice::Try::WANTARRAY ? :
0 0 if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
0 0 unless (defined $Nice::Try::BREAK)
0 0 if (defined $Nice::Try::WANTARRAY and !&Scalar::Util::blessed($Nice::Try::RETVAL[0]) || &Scalar::Util::blessed($Nice::Try::RETVAL[0]) && !$Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL'))
0 0 if ($Nice::Try::BREAK eq 'next') { }
0 0 elsif ($Nice::Try::BREAK eq 'last') { }
0 0 elsif ($Nice::Try::BREAK eq 'redo') { }
0 0 if (defined $Nice::Try::BREAK)
0 0 scalar @Nice::Try::LAST_VAL > 1 ? :
16747 0 0 unless exists $args->{'skip_frames'} or defined $args->{'skip_frames'}
16761 0 0 if $self->encode_with_json
16773 0 0 unless defined $resp
16776 0 0 if ($self->_is_a($resp, "HTTP::Promise::Exception"))
16782 0 0 if ($resp->is_success or $resp->is_redirect) { }
16792 0 0 if ($resp->header('Content_Type') =~ m[text/html]) { }
16814 0 0 if (exists $hash->{'error'} and defined $hash->{'error'}) { }
16817 0 0 if (ref $hash->{'error'} eq "HASH" and exists $hash->{'error'}{'message'})
16821 0 0 if exists $hash->{'error'}{'type'}
16822 0 0 if exists $hash->{'error'}{'request_log_url'}
16833 0 0 if ($@)
16835 0 0 $resp ? :
16850 0 0 if $self->_is_object($class)
16854 0 0 if $ref->{$c} eq $class
16864 0 0 unless exists $ref->{$type}
16873 0 0 if not ref $ref or ref $ref ne "ARRAY"
16877 0 0 if ref $hash ne "HASH"
16888 0 0 unless scalar @_
16892 0 0 if ($INC{'threads.pm'} and not exists $INC{'forks.pm'})
16897 0 0 if $@
16904 0 0 if not defined $Nice::Try::WANTARRAY and scalar @Nice::Try::LAST_VAL
0 0 &$Nice::Try::TRY ? :
0 0 if scalar @Nice::Try::VOID
0 0 if ($Nice::Try::WANT eq 'OBJECT') { }
0 0 elsif ($Nice::Try::WANT eq 'CODE') { }
0 0 elsif ($Nice::Try::WANT eq 'HASH') { }
0 0 elsif ($Nice::Try::WANT eq 'ARRAY') { }
0 0 elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
0 0 elsif ($Nice::Try::WANT eq 'GLOB') { }
0 0 elsif ($Nice::Try::WANT eq 'LIST') { }
0 0 elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
0 0 elsif ($Nice::Try::WANT eq 'VOID') { }
0 0 elsif ($Nice::Try::WANT eq 'SCALAR') { }
0 0 if defined $Nice::Try::LAST_VAL
0 0 if ($Nice::Try::WANTARRAY) { }
0 0 elsif (defined $Nice::Try::WANTARRAY) { }
0 0 if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
0 0 length $@ ? :
0 0 unless &Scalar::Util::blessed($@)
0 0 if ($Nice::Try::HAS_CATCH)
0 0 if ($Nice::Try::DIED)
16907 0 0 if not defined $Nice::Try::WANTARRAY and scalar @Nice::Try::LAST_VAL
0 0 &$Nice::Try::CATCH ? :
0 0 if scalar @Nice::Try::VOID
0 0 if ($Nice::Try::WANT eq 'OBJECT') { }
0 0 elsif ($Nice::Try::WANT eq 'CODE') { }
0 0 elsif ($Nice::Try::WANT eq 'HASH') { }
0 0 elsif ($Nice::Try::WANT eq 'ARRAY') { }
0 0 elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
0 0 elsif ($Nice::Try::WANT eq 'GLOB') { }
0 0 elsif ($Nice::Try::WANT eq 'LIST') { }
0 0 elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
0 0 elsif ($Nice::Try::WANT eq 'VOID') { }
0 0 elsif ($Nice::Try::WANT eq 'SCALAR') { }
0 0 if ($Nice::Try::WANTARRAY) { }
0 0 elsif (defined $Nice::Try::WANTARRAY) { }
0 0 if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
0 0 if (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__NEXT__') { }
0 0 elsif (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__LAST__') { }
0 0 elsif (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__REDO__') { }
0 0 if ($Nice::Try::WANT eq 'LIST') { }
0 0 elsif ($Nice::Try::WANT eq 'VOID') { }
0 0 elsif ($Nice::Try::WANT eq 'OBJECT') { }
0 0 elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
0 0 elsif ($Nice::Try::WANT eq 'SCALAR') { }
0 0 elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
0 0 elsif ($Nice::Try::WANT eq 'CODE') { }
0 0 elsif ($Nice::Try::WANT eq 'HASH') { }
0 0 elsif ($Nice::Try::WANT eq 'ARRAY') { }
0 0 elsif ($Nice::Try::WANT eq 'GLOB') { }
0 0 $Nice::Try::WANTARRAY ? :
0 0 if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
0 0 unless (defined $Nice::Try::BREAK)
0 0 if (defined $Nice::Try::WANTARRAY and !&Scalar::Util::blessed($Nice::Try::RETVAL[0]) || &Scalar::Util::blessed($Nice::Try::RETVAL[0]) && !$Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL'))
0 0 if ($Nice::Try::BREAK eq 'next') { }
0 0 elsif ($Nice::Try::BREAK eq 'last') { }
0 0 elsif ($Nice::Try::BREAK eq 'redo') { }
0 0 if (defined $Nice::Try::BREAK)
0 0 scalar @Nice::Try::LAST_VAL > 1 ? :
16908 0 0 unless defined $o
16916 0 0 if &Scalar::Util::blessed($_[0]) and $_[0]->isa("Net::API::Stripe")
16920 0 0 if (index($meth, "::") != -1)
16928 0 0 unless (scalar keys %$Net::API::Stripe::AUTOLOAD_SUBS)
16936 0 0 if (exists $Net::API::Stripe::AUTOLOAD_SUBS->{$meth})
16941 0 0 if (defined $code)
16943 0 0 if index($code, "try") != -1
16950 0 0 if ($@)
16962 0 0 if $self