line |
true |
false |
branch |
77
|
0 |
2 |
unless my $class = $args{'class'}
|
78
|
0 |
2 |
unless $class =~ /\A\w+(::\w+)*\z/
|
81
|
0 |
2 |
unless my $method = $args{'method'}
|
87
|
2 |
0 |
if (eval 'require Mo; 1')
|
101
|
0 |
2 |
if $e{'M'}
|
108
|
0 |
0 |
$#_ ? :
|
109
|
0 |
3 |
unless $#_ % 2
|
130
|
0 |
2 |
unless $fqname or not $install
|
133
|
0 |
2 |
if ($fqname =~ /(.+)::(.+)/) { }
|
150
|
4 |
2 |
if ($ass)
|
153
|
3 |
5 |
$$v{'required'} ? :
|
156
|
2 |
6 |
if (exists $$v{'default'})
|
157
|
0 |
2 |
if (ref $$v{'default'} eq 'CODE') { }
|
184
|
0 |
2 |
if ($args{'method_args'})
|
190
|
0 |
2 |
if ($install)
|