| line |
!l |
l&&!r |
l&&r |
condition |
|
181
|
0 |
0 |
0 |
scalar @_ == 1 and ref $_[0] eq 'HASH'
|
|
201
|
0 |
0 |
0 |
$p->{'json'} and ref $rv eq 'JSON::PP::Boolean' || ref $rv eq 'Module::Generic::Boolean'
|
|
209
|
0 |
0 |
0 |
$rv->can('as_hash') and overload::Overloaded($rv)
|
|
|
0 |
0 |
0 |
$rv->can('as_hash') and overload::Overloaded($rv) and overload::Method($rv, '""')
|
|
232
|
0 |
0 |
0 |
$self->_is_object($this_ref) && $this_ref->can('as_hash')
|
|
361
|
0 |
0 |
0 |
$red < $r and $red > int $r / 2
|
|
|
0 |
0 |
0 |
$red > $r and $red < int $r_p / 2
|
|
|
0 |
0 |
0 |
$red > $r and $red < int $r_p / 2 and $r_p
|
|
371
|
0 |
0 |
0 |
$green < $g and $green > int $g / 2
|
|
|
0 |
0 |
0 |
$green > $g and $green < int $g_p / 2
|
|
|
0 |
0 |
0 |
$green > $g and $green < int $g_p / 2 and $g_p
|
|
382
|
0 |
0 |
0 |
$blue < $b and $blue > int $b / 2
|
|
|
0 |
0 |
0 |
$blue > $b and $blue < int $b_p / 2
|
|
|
0 |
0 |
0 |
$blue > $b and $blue < int $b_p / 2 and $b_p
|
|
403
|
12 |
0 |
0 |
length $opts->{'message'} and not length $opts->{'text'}
|
|
489
|
14 |
0 |
3 |
length $+{'rgb_type'} and length $+{'red'}
|
|
|
14 |
0 |
3 |
length $+{'rgb_type'} and length $+{'red'} and length $+{'green'}
|
|
|
0 |
0 |
3 |
length $+{'rgb_type'} and length $+{'red'} and length $+{'green'} and length $+{'blue'}
|
|
530
|
0 |
1 |
13 |
$self->message(9, "Checking if rgb value exists for colour '${col}'") and $col_ref = $self->colour_to_rgb($col)
|
|
647
|
1 |
10 |
1 |
scalar @$params and $opts->{'text'} =~ /\n+/
|
|
896
|
68 |
0 |
1 |
$this->{'debug'} and not $this->{'debug_level'}
|
|
914
|
0 |
0 |
0 |
scalar @_ > 1 and ref $_[-1] eq 'HASH'
|
|
932
|
0 |
0 |
0 |
scalar @_ > 1 and ref $_[-1] eq 'HASH'
|
|
1003
|
1 |
0 |
0 |
&Scalar::Util::blessed($_[0]) and $_[0]->isa('Module::Generic::Exception')
|
|
1013
|
1 |
0 |
0 |
ref $_ eq 'CODE' && !$this->{'_msg_no_exec_sub'}
|
|
1015
|
1 |
0 |
0 |
$this->{'error_max_length'} > 0 and length $args->{'message'} > $this->{'error_max_length'}
|
|
1039
|
0 |
0 |
1 |
ref $Nice::Try::RETVAL[0] && $Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL')
|
|
|
0 |
1 |
0 |
defined $Nice::Try::WANTARRAY and not ref $Nice::Try::RETVAL[0] && $Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL')
|
|
1047
|
0 |
0 |
0 |
$call_offset > 0 and $call_data[0] ne $class
|
|
|
0 |
0 |
0 |
$call_offset > 0 and $call_data[0] ne $class and (caller $call_offset - 1)[0] eq $class
|
|
1053
|
0 |
0 |
0 |
$call_offset > 0 and (caller $call_offset - 1)[0] ne $class
|
|
1068
|
1 |
0 |
0 |
$err_handler and ref $err_handler eq 'CODE'
|
|
|
1 |
0 |
0 |
exists $this->{'quiet'} && $this->{'quiet'}
|
|
1117
|
0 |
1 |
0 |
not $args->{'no_return_null_object'} and want('OBJECT')
|
|
1161
|
194 |
68 |
0 |
@_ == 1 and not defined $_[0]
|
|
1166
|
2 |
0 |
0 |
&Scalar::Util::blessed($args[0]) and $args[0]->isa('Module::Generic::Hash')
|
|
|
2 |
0 |
0 |
scalar @args == 1 and not defined $args[0]
|
|
1234
|
0 |
0 |
0 |
index($data->{$name}, '::') != -1 || $data->{$name} =~ /^[a-zA-Z][a-zA-Z\_]*[a-zA-Z]$/ and $self->_is_class_loaded($data->{$name})
|
|
1273
|
262 |
0 |
0 |
$OPTIMIZE_MESG_SUB and not $this->{'verbose'}
|
|
|
262 |
0 |
0 |
$OPTIMIZE_MESG_SUB and not $this->{'verbose'} and not $this->{'debug'}
|
|
1364
|
0 |
0 |
0 |
ref $_ eq 'CODE' && !$this->{'_msg_no_exec_sub'}
|
|
1373
|
0 |
0 |
0 |
ref $_ eq 'CODE' && !$this->{'_msg_no_exec_sub'}
|
|
1399
|
0 |
0 |
0 |
$r and not ${"${class}::LOG_DEBUG";}
|
|
|
0 |
0 |
0 |
$MOD_PERL and not ${"${class}::LOG_DEBUG";}
|
|
|
0 |
0 |
0 |
not -t STDIN and $this->{'_log_handler'}
|
|
|
0 |
0 |
0 |
not -t STDIN and $this->{'_log_handler'} and ref $this->{'_log_handler'} eq 'CODE'
|
|
|
0 |
0 |
0 |
not -t STDIN and ${$class . '::MESSAGE_HANDLER';}
|
|
|
0 |
0 |
0 |
not -t STDIN and ${$class . '::MESSAGE_HANDLER';} and ref ${$class . '::MESSAGE_HANDLER';} eq 'CODE'
|
|
1464
|
0 |
0 |
0 |
scalar @_ > 1 and ref $_[-1] eq 'HASH'
|
|
|
0 |
0 |
0 |
scalar @_ > 1 and ref $_[-1] eq 'HASH' and exists $_[-1]{'level'} || exists $_[-1]{'type'} || exists $_[-1]{'message'}
|
|
1469
|
0 |
0 |
0 |
not defined $level and exists $opts->{'level'}
|
|
1475
|
0 |
0 |
0 |
ref $_ eq 'CODE' && !$this->{'_msg_no_exec_sub'}
|
|
1484
|
0 |
0 |
0 |
ref $_ eq 'CODE' && !$this->{'_msg_no_exec_sub'}
|
|
1504
|
0 |
0 |
0 |
scalar @_ > 1 and ref $_[-1] eq 'HASH'
|
|
|
0 |
0 |
0 |
scalar @_ > 1 and ref $_[-1] eq 'HASH' and exists $_[-1]{'level'} || exists $_[-1]{'type'} || exists $_[-1]{'message'} || exists $_[-1]{'colour'}
|
|
1508
|
0 |
0 |
0 |
not defined $level and exists $opts->{'level'}
|
|
1528
|
0 |
0 |
0 |
ref $_ eq 'CODE' && !$this->{'_msg_no_exec_sub'}
|
|
1548
|
0 |
0 |
0 |
scalar @args > 1 and ref $args[-1] eq 'HASH'
|
|
|
0 |
0 |
0 |
scalar @args > 1 and ref $args[-1] eq 'HASH' and exists $args[-1]{'level'} || exists $args[-1]{'type'} || exists $args[-1]{'message'}
|
|
1571
|
0 |
0 |
0 |
ref $_[-1] eq 'HASH' and exists $_[-1]{'level'}
|
|
|
0 |
0 |
0 |
$this->{'_message_default_level'} =~ /^\d+$/ and $this->{'_message_default_level'} > 0
|
|
1588
|
0 |
0 |
218 |
$_[0] =~ /^\d+$/ || ref $_[-1] eq 'HASH' && exists $_[-1]{'level'} and @_ > 1
|
|
1592
|
0 |
0 |
0 |
ref $_[-1] eq 'HASH' and exists $_[-1]{'level'}
|
|
1605
|
218 |
0 |
0 |
length $target_re and $class =~ /^$target_re$/
|
|
|
218 |
0 |
0 |
length $target_re and $class =~ /^$target_re$/ and ${$class . '::GLOBAL_DEBUG';} >= $message_level
|
|
1666
|
0 |
0 |
0 |
not &Scalar::Util::openhandle($io) and $io
|
|
1682
|
0 |
0 |
0 |
${"${class}::LOG_DEBUG";} and not $self->_set_get('log_io')
|
|
|
0 |
0 |
0 |
${"${class}::LOG_DEBUG";} and not $self->_set_get('log_io') and ${"${class}::DEB_LOG";}
|
|
1741
|
0 |
0 |
0 |
ref $err and &Scalar::Util::blessed($err)
|
|
1840
|
0 |
0 |
0 |
@_ >= 2 and @_ <= 3
|
|
1843
|
0 |
0 |
0 |
@_ == 3 and ref $_[1]
|
|
1852
|
0 |
0 |
0 |
not ref $obj and index($obj, '::') == -1
|
|
1855
|
0 |
0 |
0 |
&Scalar::Util::blessed($obj) and $ref = $obj->can($meth)
|
|
1891
|
0 |
0 |
0 |
$class ne 'Module::Generic' and $meth ne 'EXTRA_AUTOLOAD'
|
|
|
0 |
0 |
0 |
$class ne 'Module::Generic' and $meth ne 'EXTRA_AUTOLOAD' and defined &{"${class}::AUTOLOAD";}
|
|
1928
|
0 |
0 |
0 |
scalar @_ == 1 and not defined $_[0]
|
|
1936
|
0 |
0 |
0 |
ref $Nice::Try::RETVAL[0] && $Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL')
|
|
|
0 |
0 |
0 |
defined $Nice::Try::WANTARRAY and not ref $Nice::Try::RETVAL[0] && $Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL')
|
|
2111
|
0 |
0 |
0 |
@_ == 1 && (&Scalar::Util::blessed($_[0]) && $_[0]->isa('ARRAY') || ref $_[0] eq 'ARRAY')
|
|
2125
|
0 |
0 |
0 |
@_ == 1 && (&Scalar::Util::blessed($_[0]) && $_[0]->isa('ARRAY') || ref $_[0] eq 'ARRAY')
|
|
2143
|
0 |
0 |
0 |
$data->{$field} and $self->_is_object($data->{$field})
|
|
2161
|
425 |
0 |
0 |
&Scalar::Util::blessed($val) and $val->isa('JSON::PP::Boolean') || $val->isa('Module::Generic::Boolean')
|
|
2182
|
0 |
425 |
0 |
length $data->{$field} and !&Scalar::Util::blessed($data->{$field}) || &Scalar::Util::blessed($data->{$field}) && !$data->{$field}->isa('Module::Generic::Boolean') && !$data->{$field}->isa('JSON::PP::Boolean')
|
|
2335
|
0 |
0 |
0 |
scalar @_ == 1 and not defined $_[0]
|
|
2375
|
0 |
0 |
0 |
scalar @_ == 1 and not defined $_[0]
|
|
2423
|
0 |
0 |
0 |
$time =~ /^\d+$/ and not $time =~ /^\d{10}$/
|
|
2472
|
0 |
0 |
0 |
not $data->{$field} and want('OBJECT')
|
|
2487
|
0 |
0 |
0 |
scalar @_ == 1 and not defined $_[0]
|
|
2517
|
128 |
0 |
0 |
scalar @_ == 1 and not defined $_[0]
|
|
2537
|
0 |
0 |
128 |
$data->{$field} and not $self->_is_object($data->{$field})
|
|
2552
|
0 |
0 |
0 |
@_ == 1 and not defined $_[0]
|
|
2615
|
0 |
0 |
0 |
$data->{$field} and $self->_is_object($data->{$field})
|
|
2628
|
1 |
2 |
0 |
scalar @_ == 1 and not defined $_[0]
|
|
2700
|
3541 |
0 |
0 |
not $data->{$field} and want('OBJECT')
|
|
2774
|
0 |
0 |
0 |
scalar @_ == 1 and not defined $_[0]
|
|
2820
|
0 |
0 |
0 |
scalar @_ == 1 and not defined $_[0]
|
|
2823
|
0 |
0 |
0 |
scalar @_ == 1 && UNIVERSAL::isa($_[0], 'ARRAY')
|
|
2832
|
0 |
0 |
0 |
$data->{$field} and $self->_is_object($data->{$field})
|
|
2921
|
0 |
0 |
53543 |
$self->_is_object($data->{$field}) and ref $data->{$field} ne ref $self
|
|
2959
|
0 |
0 |
0 |
not $data->{$field} and want('OBJECT')
|
|
2984
|
0 |
0 |
0 |
ref $Nice::Try::RETVAL[0] && $Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL')
|
|
|
0 |
0 |
0 |
defined $Nice::Try::WANTARRAY and not ref $Nice::Try::RETVAL[0] && $Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL')
|
|
2987
|
0 |
0 |
0 |
&Scalar::Util::blessed($str) and $str->isa('URI')
|
|
|
0 |
0 |
0 |
defined $str and $str =~ m[^[a-zA-Z]+:/{2}] || $str =~ /^urn\:[a-z]+\:/ || $str =~ /^[a-z]+\:/
|
|
3059
|
0 |
0 |
0 |
&Scalar::Util::blessed($_[0]) and $_[0]->isa('Module::Generic')
|
|
3088
|
0 |
0 |
0 |
$self and $self->can('autoload')
|
|
3105
|
0 |
0 |
0 |
$data and exists $data->{$meth}
|
|
|
0 |
0 |
0 |
$self and $self->can($meth)
|
|
|
0 |
0 |
0 |
$self and $self->can($meth) and defined &{"${class}::$meth";}
|
|
3222
|
0 |
0 |
0 |
$self and $func ne 'EXTRA_AUTOLOAD'
|
|
|
0 |
0 |
0 |
$self and $func ne 'EXTRA_AUTOLOAD' and $sub_ref = $self->will('EXTRA_AUTOLOAD')
|
|
3297
|
1 |
0 |
0 |
&Scalar::Util::blessed($_[0]) and $_[0]->isa('Module::Generic::Exception')
|
|
3318
|
1 |
0 |
0 |
ref $args->{'object'} and &Scalar::Util::blessed($args->{'object'})
|
|
|
1 |
0 |
0 |
ref $args->{'object'} and &Scalar::Util::blessed($args->{'object'}) and $args->{'object'}->isa('Module::Generic::Exception')
|
|
3375
|
0 |
0 |
0 |
&Scalar::Util::blessed($e) and $e->isa($class)
|
|
3423
|
0 |
0 |
0 |
&Scalar::Util::blessed($other) and $other->isa('Module::Generic::Exception')
|
|
3425
|
0 |
0 |
0 |
$self->message eq $other->message and $self->file eq $other->file
|
|
|
0 |
0 |
0 |
$self->message eq $other->message and $self->file eq $other->file and $self->line == $other->line
|
|
3491
|
1432 |
0 |
0 |
@_ == 1 && ref $_[0]
|
|
3503
|
0 |
0 |
0 |
&Scalar::Util::blessed($other) and $other->isa('Module::Generic::Null')
|
|
3555
|
0 |
0 |
0 |
scalar @_ == 1 and not defined $_[0]
|
|
3556
|
0 |
0 |
0 |
scalar @_ == 1 and &Scalar::Util::reftype($_[0]) eq 'HASH'
|
|
3681
|
0 |
0 |
0 |
$ref eq 'scalar' and $$ref == 1 || $$ref == 0
|
|
3758
|
2 |
0 |
33 |
@_ and &Scalar::Util::blessed($_[0]) && $_[0]->isa('ARRAY') || ref $_[0] eq 'ARRAY'
|
|
3795
|
1 |
2 |
0 |
defined $length and not $length =~ /^\-?\d+$/
|
|
3969
|
0 |
0 |
1 |
scalar @_ == 1 && (&Scalar::Util::blessed($_[0]) && $_[0]->isa('ARRAY') || ref $_[0] eq 'ARRAY')
|
|
4012
|
1 |
1 |
0 |
defined $offset and not $offset =~ /^\-?\d+$/
|
|
4019
|
1 |
1 |
0 |
defined $length and not $length =~ /^\-?\d+$/
|
|
4039
|
0 |
0 |
0 |
defined $offset and defined $length
|
|
4089
|
2 |
0 |
1 |
&Scalar::Util::blessed($other) and $other->isa('Module::Generic::Array')
|
|
4173
|
3198 |
0 |
1 |
&Scalar::Util::blessed($other) and ref $other eq ref $self
|
|
4481
|
0 |
2 |
0 |
defined $limit and $limit =~ /^\d+$/
|
|
4507
|
0 |
1 |
1 |
defined $length and defined $replacement
|
|
4605
|
2 |
0 |
0 |
$@ and $self->_warnings_is_enabled
|
|
5021
|
0 |
0 |
61 |
$curr_locale and my $lconv = POSIX::localeconv()
|
|
5040
|
67 |
0 |
0 |
not $loc and exists $$SUPPORTED_LOCALES{$_[0]}
|
|
5083
|
0 |
0 |
67 |
ref $Nice::Try::RETVAL[0] && $Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL')
|
|
|
0 |
67 |
0 |
defined $Nice::Try::WANTARRAY and not ref $Nice::Try::RETVAL[0] && $Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL')
|
|
5142
|
61 |
0 |
0 |
exists $numerics->{$lconv_prop} and CORE::length $default->{$lconv_prop}
|
|
|
61 |
0 |
0 |
exists $numerics->{$lconv_prop} and CORE::length $default->{$lconv_prop} and $default->{$lconv_prop} < 0
|
|
5193
|
466 |
692 |
1146 |
not CORE::length $opts->{$lconv_prop} and exists $numerics->{$lconv_prop}
|
|
5208
|
0 |
0 |
128 |
ref $Nice::Try::RETVAL[0] && $Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL')
|
|
|
0 |
128 |
0 |
defined $Nice::Try::WANTARRAY and not ref $Nice::Try::RETVAL[0] && $Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL')
|
|
5226
|
1 |
0 |
127 |
ref $Nice::Try::RETVAL[0] && $Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL')
|
|
|
0 |
127 |
1 |
defined $Nice::Try::WANTARRAY and not ref $Nice::Try::RETVAL[0] && $Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL')
|
|
5270
|
37 |
0 |
0 |
$@ and $self->_warnings_is_enabled
|
|
5283
|
101 |
0 |
0 |
$@ and $self->_warnings_is_enabled
|
|
5308
|
2 |
0 |
0 |
@_ && $_[0] =~ /^\d+$/
|
|
5326
|
0 |
2 |
0 |
ref $Nice::Try::RETVAL[0] && $Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL')
|
|
|
0 |
0 |
2 |
defined $Nice::Try::WANTARRAY and not ref $Nice::Try::RETVAL[0] && $Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL')
|
|
5349
|
0 |
1 |
0 |
ref $Nice::Try::RETVAL[0] && $Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL')
|
|
|
0 |
0 |
1 |
defined $Nice::Try::WANTARRAY and not ref $Nice::Try::RETVAL[0] && $Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL')
|
|
5357
|
1 |
0 |
0 |
@_ && $_[0] =~ /^\d+$/
|
|
5378
|
0 |
1 |
0 |
ref $Nice::Try::RETVAL[0] && $Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL')
|
|
|
0 |
0 |
1 |
defined $Nice::Try::WANTARRAY and not ref $Nice::Try::RETVAL[0] && $Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL')
|
|
5402
|
0 |
1 |
0 |
ref $Nice::Try::RETVAL[0] && $Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL')
|
|
|
0 |
0 |
1 |
defined $Nice::Try::WANTARRAY and not ref $Nice::Try::RETVAL[0] && $Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL')
|
|
5423
|
0 |
0 |
0 |
ref $Nice::Try::RETVAL[0] && $Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL')
|
|
|
0 |
0 |
0 |
defined $Nice::Try::WANTARRAY and not ref $Nice::Try::RETVAL[0] && $Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL')
|
|
5433
|
0 |
0 |
1 |
defined $binary and CORE::length $binary
|
|
5444
|
0 |
1 |
0 |
ref $Nice::Try::RETVAL[0] && $Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL')
|
|
|
0 |
0 |
1 |
defined $Nice::Try::WANTARRAY and not ref $Nice::Try::RETVAL[0] && $Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL')
|
|
5451
|
0 |
0 |
1 |
defined $hex and CORE::length $hex
|
|
5461
|
0 |
1 |
0 |
ref $Nice::Try::RETVAL[0] && $Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL')
|
|
|
0 |
0 |
1 |
defined $Nice::Try::WANTARRAY and not ref $Nice::Try::RETVAL[0] && $Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL')
|
|
5516
|
0 |
0 |
0 |
@_ == 1 and $self->_is_hash($_[0])
|
|
5550
|
0 |
3540 |
0 |
ref $Nice::Try::RETVAL[0] && $Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL')
|
|
|
0 |
0 |
3540 |
defined $Nice::Try::WANTARRAY and not ref $Nice::Try::RETVAL[0] && $Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL')
|
|
5595
|
0 |
0 |
0 |
ref $Nice::Try::RETVAL[0] && $Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL')
|
|
|
0 |
0 |
0 |
defined $Nice::Try::WANTARRAY and not ref $Nice::Try::RETVAL[0] && $Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL')
|
|
5634
|
0 |
1 |
0 |
ref $Nice::Try::RETVAL[0] && $Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL')
|
|
|
0 |
0 |
1 |
defined $Nice::Try::WANTARRAY and not ref $Nice::Try::RETVAL[0] && $Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL')
|
|
5665
|
2669 |
0 |
871 |
$self->_is_object($val) and $val->isa('Module::Generic::Scalar')
|
|
5695
|
0 |
0 |
0 |
ref $Nice::Try::RETVAL[0] && $Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL')
|
|
|
0 |
0 |
0 |
defined $Nice::Try::WANTARRAY and not ref $Nice::Try::RETVAL[0] && $Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL')
|
|
5962
|
1 |
0 |
1 |
@_ and ref $_[-1] eq 'HASH'
|
|
5972
|
2 |
0 |
2 |
@_ and ref $_[-1] eq 'HASH'
|
|
5977
|
6 |
2 |
6 |
exists $to->{$k} and not $p->{'overwrite'}
|
|
5978
|
6 |
0 |
0 |
&Scalar::Util::blessed($this->{$k}) and $this->{$k}->isa('Module::Generic::Hash')
|
|
6015
|
0 |
0 |
1 |
@_ and ref $_[0] eq 'CODE'
|
|
6102
|
5 |
0 |
7 |
&Scalar::Util::blessed($other) and $other->isa('Module::Generic::Hash')
|
|
6127
|
0 |
0 |
2 |
&Scalar::Util::blessed($other) and $other->isa('Module::Generic::Hash')
|
|
6354
|
0 |
0 |
0 |
$data->{'readonly'} and $pkg ne 'Module::Generic::Tie'
|
|
6380
|
0 |
0 |
0 |
$_[0] eq '__priv__' and $pkg ne 'Module::Generic::Tie'
|
|
6393
|
0 |
0 |
0 |
$_[0] eq '__priv__' and $pkg ne 'Module::Generic::Tie'
|
|
6410
|
0 |
0 |
0 |
$_[0] eq '__priv__' and $pkg ne 'Module::Generic::Tie'
|
| line |
l |
!l&&r |
!l&&!r |
condition |
|
136
|
67 |
65 |
0 |
ref $that || $that
|
|
201
|
0 |
0 |
0 |
ref $rv eq 'JSON::PP::Boolean' || ref $rv eq 'Module::Generic::Boolean'
|
|
258
|
0 |
0 |
0 |
ref $self || $self
|
|
269
|
0 |
0 |
0 |
ref $self || $self
|
|
273
|
0 |
0 |
0 |
ref $self || $self
|
|
361
|
0 |
0 |
0 |
$red == $r or $red < $r and $red > int $r / 2
|
|
|
0 |
0 |
0 |
$red == $r or $red < $r and $red > int $r / 2 or $red > $r and $red < int $r_p / 2 and $r_p
|
|
|
0 |
0 |
0 |
$red == $r or $red < $r and $red > int $r / 2 or $red > $r and $red < int $r_p / 2 and $r_p or $red > $r
|
|
371
|
0 |
0 |
0 |
$green == $g or $green < $g and $green > int $g / 2
|
|
|
0 |
0 |
0 |
$green == $g or $green < $g and $green > int $g / 2 or $green > $g and $green < int $g_p / 2 and $g_p
|
|
|
0 |
0 |
0 |
$green == $g or $green < $g and $green > int $g / 2 or $green > $g and $green < int $g_p / 2 and $g_p or $green > $g
|
|
382
|
0 |
0 |
0 |
$blue == $b or $blue < $b and $blue > int $b / 2
|
|
|
0 |
0 |
0 |
$blue == $b or $blue < $b and $blue > int $b / 2 or $blue > $b and $blue < int $b_p / 2 and $b_p
|
|
|
0 |
0 |
0 |
$blue == $b or $blue < $b and $blue > int $b / 2 or $blue > $b and $blue < int $b_p / 2 and $b_p or $blue > $b
|
|
406
|
0 |
0 |
0 |
delete $opts->{'color'} || delete $opts->{'fg_colour'} || delete $opts->{'fg_color'} || delete $opts->{'fgcolour'} || delete $opts->{'fgcolor'}
|
|
|
8 |
4 |
0 |
$opts->{'colour'} //= delete $opts->{'color'} || delete $opts->{'fg_colour'} || delete $opts->{'fg_color'} || delete $opts->{'fgcolour'} || delete $opts->{'fgcolor'}
|
|
407
|
5 |
0 |
6 |
delete $opts->{'bgcolor'} || delete $opts->{'bg_colour'} || delete $opts->{'bg_color'}
|
|
|
0 |
6 |
6 |
$opts->{'bgcolour'} //= delete $opts->{'bgcolor'} || delete $opts->{'bg_colour'} || delete $opts->{'bg_color'}
|
|
494
|
1 |
0 |
2 |
$+{'opacity'} or $light
|
|
594
|
12 |
0 |
0 |
$opts->{'colour'} or $opts->{'color'}
|
|
|
0 |
0 |
0 |
$opts->{'colour'} or $opts->{'color'} or $opts->{'fgcolour'}
|
|
|
0 |
0 |
0 |
$opts->{'colour'} or $opts->{'color'} or $opts->{'fgcolour'} or $opts->{'fgcolor'}
|
|
|
0 |
0 |
0 |
$opts->{'colour'} or $opts->{'color'} or $opts->{'fgcolour'} or $opts->{'fgcolor'} or $opts->{'fg_colour'}
|
|
|
0 |
0 |
0 |
$opts->{'colour'} or $opts->{'color'} or $opts->{'fgcolour'} or $opts->{'fgcolor'} or $opts->{'fg_colour'} or $opts->{'fg_color'}
|
|
596
|
0 |
0 |
0 |
delete $opts->{'color'} || delete $opts->{'fg_colour'} || delete $opts->{'fg_color'} || delete $opts->{'fgcolour'} || delete $opts->{'fgcolor'}
|
|
|
12 |
0 |
0 |
$opts->{'colour'} ||= delete $opts->{'color'} || delete $opts->{'fg_colour'} || delete $opts->{'fg_color'} || delete $opts->{'fgcolour'} || delete $opts->{'fgcolor'}
|
|
610
|
6 |
0 |
6 |
$opts->{'bgcolour'} or $opts->{'bgcolor'}
|
|
|
0 |
0 |
6 |
$opts->{'bgcolour'} or $opts->{'bgcolor'} or $opts->{'bg_colour'}
|
|
|
0 |
0 |
6 |
$opts->{'bgcolour'} or $opts->{'bgcolor'} or $opts->{'bg_colour'} or $opts->{'bg_color'}
|
|
612
|
0 |
0 |
0 |
delete $opts->{'bgcolor'} || delete $opts->{'bg_colour'} || delete $opts->{'bg_color'}
|
|
|
6 |
0 |
0 |
$opts->{'bgcolour'} ||= delete $opts->{'bgcolor'} || delete $opts->{'bg_colour'} || delete $opts->{'bg_color'}
|
|
747
|
4 |
0 |
1 |
$+{'style1'} || $+{'style2'}
|
|
762
|
0 |
0 |
4 |
$@ or ref $def ne 'HASH'
|
|
764
|
0 |
0 |
0 |
$@ || qq[Invalid styling "$this_def"]
|
|
873
|
3 |
0 |
0 |
$+{'style1'} || $+{'style2'}
|
|
902
|
1 |
68 |
0 |
$this->{'debug'} || ${"${class}::DEBUG";}
|
|
998
|
1 |
0 |
0 |
ref $self || $self
|
|
1053
|
0 |
0 |
0 |
$call_data[9] or $call_offset > 0 and (caller $call_offset - 1)[0] ne $class
|
|
1166
|
68 |
0 |
2 |
ref $args[0] eq 'HASH' or &Scalar::Util::blessed($args[0]) and $args[0]->isa('Module::Generic::Hash')
|
|
1234
|
0 |
0 |
0 |
index($data->{$name}, '::') != -1 || $data->{$name} =~ /^[a-zA-Z][a-zA-Z\_]*[a-zA-Z]$/
|
|
1306
|
218 |
0 |
0 |
ref $self || $self
|
|
1312
|
0 |
218 |
0 |
$this->{'verbose'} or $this->{'debug'}
|
|
|
218 |
0 |
0 |
$this->{'verbose'} or $this->{'debug'} or ${$class . '::DEBUG';}
|
|
1332
|
0 |
0 |
0 |
(caller 1)[3] eq 'Module::Generic::messagef' or (caller 1)[3] eq 'Module::Generic::message_colour'
|
|
1458
|
0 |
0 |
0 |
ref $self || $self
|
|
1460
|
0 |
0 |
0 |
$this->{'verbose'} or $this->{'debug'}
|
|
|
0 |
0 |
0 |
$this->{'verbose'} or $this->{'debug'} or ${$class . '::DEBUG';}
|
|
1464
|
0 |
0 |
0 |
exists $_[-1]{'level'} || exists $_[-1]{'type'} || exists $_[-1]{'message'}
|
|
1498
|
0 |
0 |
0 |
ref $self || $self
|
|
1500
|
0 |
0 |
0 |
$this->{'verbose'} or $this->{'debug'}
|
|
|
0 |
0 |
0 |
$this->{'verbose'} or $this->{'debug'} or ${$class . '::DEBUG';}
|
|
1504
|
0 |
0 |
0 |
exists $_[-1]{'level'} || exists $_[-1]{'type'} || exists $_[-1]{'message'} || exists $_[-1]{'colour'}
|
|
1544
|
0 |
0 |
0 |
$this->{'verbose'} or $this->{'debug'}
|
|
|
0 |
0 |
0 |
$this->{'verbose'} or $this->{'debug'} or ${$class . '::DEBUG';}
|
|
1548
|
0 |
0 |
0 |
exists $args[-1]{'level'} || exists $args[-1]{'type'} || exists $args[-1]{'message'}
|
|
1563
|
218 |
0 |
0 |
ref $self || $self
|
|
1588
|
218 |
0 |
0 |
$_[0] =~ /^\d+$/ || ref $_[-1] eq 'HASH' && exists $_[-1]{'level'}
|
|
1605
|
0 |
0 |
218 |
$this->{'debug'} >= $message_level or $this->{'verbose'} >= $message_level
|
|
|
0 |
0 |
218 |
$this->{'debug'} >= $message_level or $this->{'verbose'} >= $message_level or ${$class . '::DEBUG';} >= $message_level
|
|
|
0 |
0 |
218 |
$this->{'debug'} >= $message_level or $this->{'verbose'} >= $message_level or ${$class . '::DEBUG';} >= $message_level or $this->{'debug_level'} >= $message_level
|
|
|
0 |
0 |
218 |
$this->{'debug'} >= $message_level or $this->{'verbose'} >= $message_level or ${$class . '::DEBUG';} >= $message_level or $this->{'debug_level'} >= $message_level or $this->{'debug'} >= 100
|
|
|
0 |
0 |
218 |
$this->{'debug'} >= $message_level or $this->{'verbose'} >= $message_level or ${$class . '::DEBUG';} >= $message_level or $this->{'debug_level'} >= $message_level or $this->{'debug'} >= 100 or length $target_re and $class =~ /^$target_re$/ and ${$class . '::GLOBAL_DEBUG';} >= $message_level
|
|
1706
|
0 |
0 |
0 |
ref $self || $self
|
|
1711
|
0 |
0 |
0 |
$flag || $this->{'verbose'} || $this->{'debug'}
|
|
1798
|
0 |
0 |
0 |
ref $that || $that
|
|
1859
|
0 |
0 |
0 |
ref $obj || $obj
|
|
2161
|
0 |
0 |
0 |
$val->isa('JSON::PP::Boolean') || $val->isa('Module::Generic::Boolean')
|
|
|
0 |
0 |
425 |
lc $val eq 'true' or lc $val eq 'false'
|
|
2182
|
0 |
0 |
425 |
!&Scalar::Util::blessed($data->{$field}) || &Scalar::Util::blessed($data->{$field}) && !$data->{$field}->isa('Module::Generic::Boolean') && !$data->{$field}->isa('JSON::PP::Boolean')
|
|
2264
|
0 |
0 |
0 |
$type eq 'object' or $type eq 'scalar_or_object'
|
|
|
0 |
0 |
0 |
$type eq 'object' or $type eq 'scalar_or_object' or $type eq 'object_array'
|
|
|
0 |
0 |
0 |
$type eq 'class' or $type eq 'class_array'
|
|
2645
|
0 |
0 |
0 |
ref $_[0] eq 'HASH' or &Scalar::Util::blessed($_[0])
|
|
2881
|
0 |
0 |
0 |
ref $val eq 'HASH' or ref $val eq 'ARRAY'
|
|
2896
|
0 |
0 |
3607 |
ref $val eq 'SCALAR' or UNIVERSAL::isa($val, 'SCALAR')
|
|
2921
|
1539 |
53543 |
0 |
not $self->_is_object($data->{$field}) or $self->_is_object($data->{$field}) and ref $data->{$field} ne ref $self
|
|
2950
|
0 |
0 |
0 |
ref $_[0] eq 'HASH' or &Scalar::Util::blessed($_[0])
|
|
2987
|
0 |
0 |
0 |
$str =~ m[^[a-zA-Z]+:/{2}] || $str =~ /^urn\:[a-z]+\:/ || $str =~ /^[a-z]+\:/
|
|
3013
|
1 |
0 |
0 |
ref $_[0] || $_[0]
|
|
3018
|
0 |
0 |
0 |
ref $self || $self
|
|
3042
|
0 |
0 |
0 |
ref $self || $self
|
|
3050
|
0 |
0 |
0 |
ref $self || $self
|
|
3061
|
0 |
0 |
0 |
ref $self || $self
|
|
3452
|
0 |
0 |
0 |
ref $self || $self
|
|
3489
|
0 |
1432 |
0 |
ref $this || $this
|
|
3549
|
0 |
0 |
0 |
ref $this || $this
|
|
3668
|
0 |
0 |
0 |
ref $self || $self
|
|
3681
|
0 |
0 |
0 |
$ref eq 'hash' or $ref eq 'array'
|
|
|
0 |
0 |
0 |
$ref eq 'json::pp::boolean' or $ref eq 'module::generic::boolean'
|
|
|
0 |
0 |
0 |
$$ref == 1 || $$ref == 0
|
|
|
0 |
0 |
0 |
$ref eq 'json::pp::boolean' or $ref eq 'module::generic::boolean' or $ref eq 'scalar' and $$ref == 1 || $$ref == 0
|
|
3758
|
0 |
33 |
0 |
&Scalar::Util::blessed($_[0]) && $_[0]->isa('ARRAY') || ref $_[0] eq 'ARRAY'
|
|
3759
|
29 |
6 |
0 |
ref $this || $this
|
|
3819
|
1 |
0 |
0 |
CORE::shift @_ || do {
warn "No subroutine callback as provided for each\n" if $self->_warnings_is_enabled;
return
}
|
|
4115
|
1 |
0 |
0 |
ref $_[0] || $_[0]
|
|
4192
|
0 |
53609 |
1726 |
ref $_[0] eq 'SCALAR' or UNIVERSAL::isa($_[0], 'SCALAR')
|
|
|
0 |
0 |
1726 |
ref $_[0] eq 'ARRAY' or UNIVERSAL::isa($_[0], 'ARRAY')
|
|
4215
|
8 |
55327 |
0 |
ref $this || $this
|
|
4454
|
0 |
0 |
3413 |
ref $_[0] eq 'SCALAR' or UNIVERSAL::isa($_[0], 'SCALAR')
|
|
|
0 |
0 |
3413 |
ref $_[0] eq 'ARRAY' or UNIVERSAL::isa($_[0], 'ARRAY')
|
|
4489
|
0 |
2 |
0 |
Want::want('OBJECT') or Want::want('SCALAR')
|
|
4552
|
0 |
0 |
0 |
ref $_[0] || $_[0]
|
|
5667
|
234 |
3306 |
0 |
$val ne $self->{$prop} or not defined $val
|
|
5728
|
1 |
16 |
0 |
ref $this || $this
|
|
5855
|
1 |
132 |
0 |
ref $that || $that
|
|
5959
|
0 |
0 |
2 |
not $hash or &Scalar::Util::reftype($hash) ne 'HASH'
|
|
5978
|
2 |
0 |
6 |
ref $this->{$k} eq 'HASH' or &Scalar::Util::blessed($this->{$k}) and $this->{$k}->isa('Module::Generic::Hash')
|
|
6184
|
0 |
133 |
0 |
ref $self || $self
|
|
6201
|
0 |
0 |
1 |
$self->_exclude($caller) or not $self->{'enable'}
|
|
6218
|
0 |
0 |
3 |
$self->_exclude($caller) or not $self->{'enable'}
|
|
6236
|
538 |
10 |
18 |
$self->_exclude($caller) or not $self->{'enable'}
|
|
6255
|
0 |
0 |
26 |
$self->_exclude($caller) or not $self->{'enable'}
|
|
6281
|
0 |
0 |
0 |
$self->_exclude($caller) or not $self->{'enable'}
|
|
6298
|
800 |
0 |
3116 |
$self->_exclude($caller) or not $self->{'enable'}
|
|
6345
|
0 |
0 |
0 |
ref $self || $self
|