| line |
true |
false |
branch |
|
80
|
15 |
22 |
if ($first) { } |
|
84
|
4 |
11 |
defined $self->{'message'} ? : |
|
90
|
0 |
22 |
if (my $eval = $self->evaltext) { } |
|
|
0 |
22 |
elsif ($sub eq '(eval)') { } |
|
91
|
0 |
0 |
if ($self->is_require) { } |
|
109
|
16 |
6 |
if (my(@a) = $self->args) |
|
113
|
2 |
21 |
unless (defined $_) |
|
120
|
0 |
21 |
if ref $_ |
|
134
|
1 |
20 |
exists $p->{'max_arg_length'} ? : |
|
136
|
2 |
19 |
if ($max_arg_length and length $_ > $max_arg_length) |
|
145
|
13 |
8 |
unless /^-?[\d.]+$/ |
|
153
|
0 |
21 |
if (my $e = $@) |
|
154
|
0 |
0 |
$e =~ /malformed utf-8/i ? : |
|
165
|
2 |
35 |
$self->{'indent'} && !$first ? : |