line |
!l |
l&&!r |
l&&r |
condition |
307
|
0 |
0 |
0 |
@moose and my $apply = 'Moose::Util'->can('apply_all_roles') |
376
|
0 |
0 |
0 |
defined $builder and $builder eq '1' |
384
|
13 |
0 |
1 |
$$attr{'required'} and not exists $$instance{$name} |
389
|
21 |
3 |
1 |
exists $$attr{'trigger'} and exists $$params{$name} |
476
|
190 |
0 |
0 |
defined $$args{'builder'} and $$args{'builder'} eq '1' |
478
|
184 |
0 |
6 |
defined $$args{'clearer'} and $$args{'clearer'} eq '1' |
480
|
188 |
1 |
1 |
defined $$args{'predicate'} and $$args{'predicate'} eq '1' |
482
|
186 |
3 |
1 |
defined $$args{'trigger'} and $$args{'trigger'} eq '1' |
656
|
4 |
8 |
1 |
@_ && ref $_[0] eq 'HASH' |
687
|
0 |
0 |
0 |
$INC{'Role/Tiny.pm'} and Role::Tiny::does_role($self, $role) |
690
|
0 |
0 |
0 |
$INC{'Moose/Util.pm'} and 'Moose::Util'->can('does_role') |
|
0 |
0 |
0 |
$INC{'Moose/Util.pm'} and 'Moose::Util'->can('does_role') and Moose::Util::does_role($self, $role) |
line |
l |
!l&&r |
!l&&!r |
condition |
40
|
0 |
14 |
0 |
delete $args{'metaclass'} || $class->default_metaclass |
69
|
0 |
2 |
0 |
delete $args{'metarole'} || $class->default_metarole |
76
|
0 |
0 |
0 |
&Scalar::Util::blessed($_[0]) || $_[0] |
|
0 |
0 |
0 |
&Scalar::Util::blessed($_[0]) || $_[0] |
194
|
0 |
408 |
0 |
$args{'attribute_metaclass'} ||= $class->default_attribute_metaclass |
198
|
366 |
42 |
0 |
$$meta_class_objects{$package} ||= do {
bless {'package', $package, 'attributes', {}, '_attributes', [], %args}, $class
} |
455
|
14 |
0 |
164 |
$_[0]{'builder'} || $_[0]{'default'} || $_[0]{'trigger'} || $ENV{'PERL_MOOS_ACCESSOR_CALLS'} |
485
|
1 |
1 |
0 |
$method ||= $_[0]->can($trigger) |
648
|
0 |
13 |
0 |
&Scalar::Util::blessed($class) || $class |
682
|
190 |
0 |
162 |
&Scalar::Util::blessed($_[0]) || $_[0] |
699
|
0 |
0 |
0 |
'UNIVERSAL'->can('DOES') || 'UNIVERSAL'->can('isa') |