| line |
true |
false |
branch |
|
781
|
43 |
2 |
unless @_ |
|
782
|
1 |
1 |
unless ref $_[0] eq 'CODE' |
|
793
|
4 |
1 |
wantarray ? : |
|
794
|
2 |
1 |
@_ ? : |
|
800
|
1 |
47 |
if @_ % 2 |
|
812
|
5 |
4 |
unless $super->can('my_class') |
|
816
|
24 |
0 |
unless exists $p{$param} |
|
822
|
5 |
42 |
if (exists $p{'error_handler'}) { } |
|
823
|
1 |
4 |
unless ref $p{'error_handler'} eq 'CODE' |
|
830
|
2 |
44 |
if $classes{$p{'package'}} |
|
1270
|
21 |
9 |
if (my $attrs = delete $$class{'build_attr_ord'}) |
|
1275
|
21 |
9 |
if (my $ctors = delete $$class{'build_ctor_ord'}) |
|
1280
|
7 |
23 |
if (my $meths = delete $$class{'build_meth_ord'}) |
|
1299
|
0 |
146 |
unless $val and $val =~ /\w/ |
|
1300
|
137 |
9 |
unless my $view = eval "Class::Meta::\U$val\E" |