line |
true |
false |
branch |
34
|
0 |
165 |
if ($with_args) { }
|
38
|
0 |
0 |
if @caller
|
43
|
10 |
155 |
unless @caller
|
45
|
26 |
129 |
if ($i == 1) { }
|
47
|
24 |
2 |
if ($caller[3] =~ /(.+)::BUILD(ARGS)?\z/) { }
|
54
|
14 |
10 |
if ($is_build) { }
|
55
|
0 |
14 |
if ($caller[0] eq 'Method::Generate::BuildAll' or $caller[0] eq 'Method::Generate::Constructor') { }
|
|
4 |
10 |
elsif ($caller[0] eq 'Mo::build') { }
|
|
4 |
6 |
elsif ($caller[0] eq 'Class::MOP::Method') { }
|
|
4 |
2 |
elsif (grep {$_ eq 'Mouse::Object';} @{"${subpkg}::ISA";}) { }
|
73
|
0 |
10 |
if ($caller[0] eq 'Moo::Object') { }
|
|
4 |
6 |
elsif ($caller[0] eq 'Moose::Object') { }
|
|
4 |
2 |
elsif (grep {$_ eq 'Mouse::Object';} @{"${subpkg}::ISA";}) { }
|
88
|
44 |
85 |
unless ($wrappers_done)
|
89
|
32 |
12 |
if ($is_build) { }
|
90
|
8 |
24 |
if ($objsys eq 'Mo') { }
|
|
0 |
24 |
elsif ($objsys eq 'Moo') { }
|
|
20 |
4 |
elsif ($objsys eq 'Moose') { }
|
91
|
4 |
4 |
if $caller[3] eq 'Mo::build::__ANON__'
|
94
|
0 |
0 |
if $caller[0] eq 'Moo::Object' or $caller[3] eq 'Moo::Object::new'
|
98
|
8 |
4 |
if $caller[0] eq 'Moose::Object' or $caller[0] eq 'Moose::Meta::Class' or $caller[3] eq 'Moose::Object::new'
|
103
|
0 |
4 |
if ($] < 5.014)
|
104
|
0 |
0 |
if $skips++ < 1 and $caller[3] =~ /eval/
|
109
|
0 |
12 |
if ($objsys eq 'Moo') { }
|
|
8 |
4 |
elsif ($objsys eq 'Moose') { }
|
110
|
0 |
0 |
if $caller[3] eq 'Moo::Object::new'
|
113
|
4 |
4 |
if $caller[3] eq 'Moose::Object::new'
|
116
|
0 |
4 |
if ($] < 5.014)
|
117
|
0 |
0 |
if $skips++ < 1 and $caller[3] =~ /eval/
|
127
|
10 |
95 |
if $routine eq 'get_constructor_caller' and $j > $start
|
130
|
10 |
10 |
if ($routine eq 'get_constructor_caller') { }
|