| line |
true |
false |
branch |
|
119
|
1 |
15 |
if @_ and @_ & 1 |
|
122
|
1 |
14 |
if defined $params{'Regexp'} and defined $params{'Literal'} |
|
131
|
6 |
8 |
if (defined $params{'Literal'}) { } |
|
132
|
1 |
5 |
unless length $params{'Literal'} |
|
136
|
2 |
2 |
if (exists $params{'InputLiteral'} or defined $params{'InputRegexp'} or defined $params{'OutputLiteral'}) |
|
146
|
5 |
3 |
if (exists $params{'InputLiteral'}) { } |
|
|
2 |
1 |
elsif (defined $params{'InputRegexp'}) { } |
|
151
|
2 |
3 |
if (defined $input_regexp and length $input_regexp) { } |
|
159
|
1 |
4 |
if defined $params{'InputRegexp'} |
|
172
|
6 |
1 |
if (defined $params{'OutputLiteral'}) { } |
|
181
|
0 |
9 |
if scalar keys %params |
|
214
|
3 |
4 |
if (length $$self[1]) |
|
217
|
5 |
2 |
@ret ? : |
|
227
|
42 |
68 |
if (defined $data) |
|
234
|
100 |
12 |
unless ($$self[4]) |
|
237
|
64 |
36 |
unless $$self[1] =~ s/^(.*?)$$self[2]//s |
|
244
|
6 |
6 |
if ($$self[4] & 1) |
|
246
|
3 |
3 |
unless $$self[1] =~ s/^(.*?)(\x0D\x0A?|\x0A\x0D?)// |
|
253
|
1 |
2 |
if (length $2 == 2 or length $$self[1]) { } |
|
275
|
6 |
0 |
if ($$self[4] & 2) |
|
276
|
4 |
2 |
unless length $$self[1] |
|
280
|
1 |
1 |
$$self[2] eq "\r" ? : |
|
|
1 |
1 |
if (substr($$self[1], 0, 1) eq ($$self[2] eq "\r" ? "\n" : "\r")) { } |