| 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 ? : |