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