| line |
true |
false |
branch |
|
26
|
85 |
193 |
$with_dollar ? :
|
|
27
|
5 |
273 |
unless $name =~ /\A${bonus}[^\W\d]\w*\z/u
|
|
33
|
2 |
76 |
unless $attrs =~ /
|
|
79
|
0 |
72 |
unless $_[0] =~ /\G ( \w+ (?: :: \w+)* ) \s* /cgux
|
|
81
|
72 |
0 |
unless $name =~ /::/u
|
|
84
|
2 |
70 |
unless defined &$name
|
|
88
|
62 |
8 |
unless $_[0] =~ /\G \[ \s* /cgux
|
|
93
|
8 |
8 |
if @args
|
|
109
|
4 |
72 |
if ($_[0] =~ /\G \( \s* /cgux) { }
|
|
111
|
0 |
4 |
unless $_[0] =~ /\G \) \s* /cgux
|
|
125
|
70 |
4 |
!$compl ? :
|
|
166
|
0 |
28 |
unless $type =~ /\G \z/cgux
|
|
172
|
120 |
1056 |
exists $href->{$key} ? :
|
|
179
|
0 |
0 |
if ($array->[$i] == $x)
|
|
184
|
1 |
0 |
unless (defined $index)
|
|
289
|
27 |
69 |
unless @_
|
|
292
|
51 |
51 |
if (ref $item) { }
|
|
295
|
2 |
49 |
unless my $type = $import_map{$item}
|
|
297
|
46 |
3 |
ref $type ? :
|
|
310
|
125 |
46 |
unless ref $proto_type
|
|
314
|
1 |
344 |
unless my $base = $type_map{$defaults}
|
|
319
|
21 |
149 |
if (exists $type{'strict'})
|
|
327
|
0 |
170 |
unless $clean{'name'} =~ /\A(?:optional|required|prohibited)\z/u
|
|
331
|
78 |
92 |
if $clean{'attrs'}
|
|
333
|
164 |
4 |
if (not exists $type{'reify_type'}) { }
|
|
337
|
0 |
4 |
if (not ref $rt) { }
|
|
|
0 |
4 |
elsif (ref $rt ne 'CODE') { }
|
|
338
|
0 |
0 |
$rt eq 'moose' ? :
|
|
|
0 |
0 |
$rt eq 'auto' ? :
|
|
349
|
150 |
18 |
if (not exists $type{'install_sub'}) { }
|
|
353
|
17 |
1 |
if (not ref $is) { }
|
|
|
0 |
1 |
elsif (ref $is ne 'CODE') { }
|
|
364
|
76 |
92 |
unless ref $shift
|
|
369
|
1 |
84 |
if (ref $item) { }
|
|
370
|
0 |
1 |
unless @$item == 2
|
|
376
|
0 |
85 |
if $name eq "\$_"
|
|
378
|
1 |
84 |
if (defined $type)
|
|
379
|
0 |
1 |
unless builtin::blessed($type)
|
|
397
|
1 |
167 |
if %type
|
|
408
|
25 |
137 |
$type->{'name'} eq 'required' ? :
|
|
|
5 |
162 |
$type->{'name'} eq 'prohibited' ? :
|
|
411
|
166 |
1 |
if $type->{'default_arguments'}
|
|
412
|
152 |
15 |
if $type->{'check_argument_count'}
|
|
413
|
167 |
0 |
if $type->{'check_argument_types'}
|
|
414
|
76 |
91 |
if $type->{'invocant'}
|
|
415
|
167 |
0 |
if $type->{'named_parameters'}
|
|
416
|
167 |
0 |
if $type->{'types'}
|
|
417
|
15 |
152 |
if $type->{'runtime'}
|
|
426
|
166 |
1 |
!@{$type->{'shift_types'};} ? :
|
|
435
|
3 |
5 |
unless (@_)
|
|
461
|
36 |
520 |
defined $slurpy ? :
|
|
476
|
12 |
4 |
unless $pair
|
|
|
12 |
4 |
unless my($v, $t) = @{[] unless $pair;}
|
|
496
|
0 |
18 |
unless my $key = &_cv_root($func)
|
|
497
|
2 |
16 |
unless my $info = $metadata{$key}
|