| line |
true |
false |
branch |
|
30
|
23 |
171 |
if @_ |
|
33
|
8 |
186 |
unless $$self{'_lines'} |
|
41
|
0 |
62 |
if @_ |
|
50
|
0 |
158 |
if @_ |
|
53
|
65 |
93 |
unless ref $self |
|
65
|
4 |
13 |
($lines[0] || '') =~ /\r\n \Z/msx ? : |
|
81
|
16 |
1 |
if (ref $self) |
|
99
|
6 |
17 |
if ($line =~ /^\s/msx) |
|
101
|
0 |
6 |
unless @lines |
|
120
|
17 |
18 |
if (@_ == 0) |
|
140
|
0 |
59 |
unless my $field_name = shift() |
|
152
|
0 |
53 |
unless my $field_name = shift() |
|
156
|
0 |
53 |
if @fields > 1 |
|
164
|
0 |
53 |
unless my $key = shift() |
|
168
|
7 |
46 |
unless defined $field |
|
174
|
0 |
2 |
unless my $key = shift() |
|
178
|
2 |
4 |
&$key_cmp($_->key, $key) == 0 ? : |
|
190
|
0 |
1 |
unless my(@field_names) = @_ |
|
207
|
0 |
6 |
unless my $key = shift() |
|
211
|
2 |
4 |
if (@fields == 1) { } |
|
|
4 |
0 |
elsif (@fields == 0) { } |
|
233
|
2 |
0 |
if ref $a and $a->can('encode') |
|
234
|
0 |
2 |
if ref $b and $b->can('encode') |
|
254
|
13 |
41 |
unless ref $self |
|
257
|
16 |
25 |
if (@_) |
|
260
|
1 |
40 |
unless $$self{'line_ending'} |
|
291
|
68 |
134 |
if (@_ == 0) { } |
|
292
|
68 |
0 |
unless (ref $value) |
|
302
|
129 |
73 |
if ref $$self{'parent'} and not isweak($$self{'parent'}) |
|
313
|
86 |
72 |
if ($self->parent->parent->tight_folding) { } |
|
329
|
25 |
0 |
if ref $a and $a->can('as_string') |
|
330
|
2 |
23 |
if ref $b and $b->can('as_string') |
|
341
|
3 |
163 |
if @_ |
|
344
|
105 |
61 |
ref $$self{'parent'} ? : |
|
350
|
5 |
2 |
if (@_) |
|
373
|
190 |
3 |
if (@args > 0) |
|
377
|
2 |
191 |
unless (ref $line) |
|
383
|
183 |
10 |
if (exists $$line{'line'}) |
|
385
|
72 |
111 |
if (blessed($$line{'line'})) { } |
|
404
|
115 |
6 |
if ref $$line{'parent'} and not isweak($$line{'parent'}) |
|
412
|
72 |
717 |
if @_ |
|
419
|
3 |
197 |
if @_ |
|
427
|
14 |
2 |
if ref $self |
|
435
|
178 |
10 |
if (exists $$self{'original_line'}) |
|
439
|
1 |
177 |
unless $original_line =~ / \n \Z /msx |
|
450
|
10 |
0 |
unless $line =~ /\n$/msx |
|
460
|
3 |
0 |
if ref $a and $a->can('as_string') |
|
461
|
0 |
3 |
if ref $b and $b->can('as_string') |
|
472
|
0 |
226 |
if @_ |
|
475
|
157 |
69 |
ref $self ? : |