line |
true |
false |
branch |
52
|
40 |
28 |
unless length $$self[0] and $$self[0] =~ /\x0D\x0A/ |
57
|
18 |
10 |
if ($$self[1] & 1) |
60
|
6 |
12 |
if $$self[0] =~ s/^([-+:])(.*?)\x0D\x0A//s |
62
|
6 |
6 |
if ($$self[0] =~ s/^\*(-?\d+)\x0D\x0A//) { } |
|
6 |
0 |
elsif ($$self[0] =~ s/^\$(-?\d+)\x0D\x0A//) { } |
66
|
2 |
4 |
if $1 == 0 |
69
|
2 |
2 |
if $1 < 0 |
79
|
2 |
4 |
if $1 < 0 |
92
|
12 |
8 |
if ($$self[1] & 2) |
95
|
6 |
6 |
unless $$self[0] =~ s/^\$(-?\d+)\x0D\x0A// |
98
|
2 |
4 |
if ($1 < 0) |
99
|
0 |
2 |
if (push(@{$$self[2];}, undef) == $$self[4]) |
115
|
0 |
12 |
unless $$self[1] & 4 |
120
|
4 |
8 |
if length $$self[0] < $$self[3] |
123
|
6 |
2 |
if (push(@{$$self[2];}, substr(substr($$self[0], 0, $$self[3], ''), 0, $$self[3] - 2)) == $$self[4]) |
145
|
0 |
0 |
if length $$self[0] |
154
|
0 |
4 |
unless ref $line eq 'ARRAY' |
155
|
0 |
4 |
unless scalar @{$line;} |