line |
true |
false |
branch |
52
|
1 |
0 |
@_ ? : |
74
|
0 |
1465 |
if $PRETTY |
76
|
11 |
1454 |
unless $block =~ /\S/ |
105
|
0 |
0 |
if $PRETTY |
134
|
23 |
2152 |
unless $block |
168
|
0 |
172 |
unless @$items |
169
|
51 |
121 |
if scalar @$items == 1 |
183
|
0 |
3077 |
unless @$ident |
194
|
3075 |
2 |
if (ref $self) |
196
|
9 |
3066 |
if ($self->{'TRACE_VARS'}) |
210
|
46 |
3029 |
if (@$ident > 2 and $ns = $self->{'NAMESPACE'}) |
213
|
31 |
15 |
if ($ns = $ns->{$key}) |
219
|
1667 |
1379 |
if (scalar @$ident <= 2 and not $ident->[1]) { } |
234
|
0 |
6 |
unless @$ident |
235
|
3 |
3 |
if (scalar @$ident <= 2 and not $ident->[1]) { } |
252
|
508 |
4 |
if (ref $var) |
253
|
442 |
66 |
if (scalar @$var == 2 and not $var->[1]) { } |
260
|
31 |
481 |
if $default |
272
|
139 |
733 |
if @$hash |
275
|
147 |
725 |
unless @$args |
285
|
4 |
202 |
if (@$names > 1) { } |
369
|
44 |
111 |
@$hash ? : |
384
|
5 |
31 |
@$hash ? : |
399
|
52 |
32 |
$else ? : |
401
|
0 |
84 |
if $PRETTY |
407
|
0 |
8 |
if $PRETTY |
410
|
38 |
46 |
if (defined $else) |
411
|
0 |
38 |
if $PRETTY |
428
|
0 |
151 |
@$args ? : |
432
|
139 |
12 |
if ($target) { } |
445
|
0 |
151 |
if $PRETTY |
506
|
2 |
11 |
if @$file > 1 |
510
|
0 |
11 |
if $PRETTY |
512
|
11 |
0 |
@$hash ? : |
528
|
0 |
2 |
if $PRETTY |
531
|
2 |
0 |
@$hash ? : |
559
|
0 |
16 |
if $PRETTY |
596
|
0 |
31 |
if $PRETTY |
607
|
7 |
13 |
if defined $default |
609
|
0 |
20 |
if $PRETTY |
640
|
0 |
131 |
if $PRETTY |
642
|
4 |
127 |
$final ? : |
644
|
0 |
131 |
if $PRETTY |
653
|
0 |
67 |
if $PRETTY |
655
|
22 |
45 |
$n++ ? : |
660
|
0 |
131 |
if $PRETTY |
661
|
108 |
23 |
if ($default) { } |
662
|
0 |
108 |
if $PRETTY |
668
|
0 |
131 |
if $PRETTY |
710
|
5 |
32 |
if (not $info) { } |
|
4 |
28 |
elsif (@$hash or @$args) { } |
780
|
145 |
64 |
if $args |
797
|
0 |
30 |
if $PRETTY |
799
|
16 |
14 |
if (%$defblocks) |
802
|
0 |
16 |
if $PRETTY |
806
|
28 |
2 |
@$hash ? : |
833
|
0 |
12 |
if $PRETTY |
885
|
0 |
2 |
if $PRETTY |
886
|
2 |
0 |
$line ? : |
906
|
6 |
0 |
$args ? : |
|
6 |
128 |
if $alias |
908
|
52 |
82 |
if $args |
909
|
0 |
134 |
if $PRETTY |
934
|
11 |
0 |
if (ref $name) |
935
|
11 |
0 |
if (scalar @$name == 2 and not $name->[1]) { } |
942
|
0 |
11 |
if $PRETTY |
963
|
0 |
10 |
if $PRETTY |
965
|
3 |
7 |
if ($args) { } |
968
|
0 |
3 |
$nargs > 1 ? : |
1020
|
9 |
6 |
@$hash ? : |