| line |
true |
false |
branch |
|
42
|
0 |
0 |
if $QUIET |
|
44
|
0 |
0 |
if @_ |
|
48
|
0 |
0 |
if ($str =~ /\n/) |
|
52
|
0 |
0 |
if $tr > 0 |
|
54
|
0 |
0 |
if ($str =~ /[\b\r\n]/) { } |
|
59
|
0 |
0 |
if ($former_str) { } |
|
64
|
0 |
0 |
if ($prefix_len > $postfix_len) { } |
|
74
|
0 |
0 |
if ($tr > 0) |
|
78
|
0 |
0 |
if (defined $add_str) |
|
92
|
0 |
0 |
if (defined wantarray) { } |
|
97
|
0 |
0 |
unless Time::HiRes::time() - $last_time >= $delay or $_[0] and $_[0] eq '-force' |
|
103
|
0 |
0 |
if Time::HiRes::time() - $last_times{$file . $line} < ($_[1] || 1) |
|
118
|
0 |
0 |
if (wantarray) { } |
|
|
0 |
0 |
elsif (defined wantarray) { } |
|
129
|
0 |
0 |
if $@ |
|
130
|
0 |
0 |
wantarray ? : |
|
149
|
0 |
0 |
if (wantarray) { } |
|
|
0 |
0 |
elsif (defined wantarray) { } |
|
161
|
0 |
0 |
unless $QUIET |
|
168
|
0 |
0 |
wantarray ? : |