| line |
true |
false |
branch |
|
131
|
1 |
0 |
if (defined $newval) |
|
160
|
0 |
0 |
if (defined $newval) |
|
162
|
0 |
0 |
if (length $newval != 1) { } |
|
197
|
0 |
0 |
if (defined $newval) |
|
240
|
0 |
0 |
if (defined $newval and $newval ne '_') |
|
274
|
0 |
0 |
if (defined $newval) |
|
300
|
1 |
0 |
if (defined $newval) |
|
329
|
0 |
0 |
if (defined $newval) |
|
356
|
0 |
0 |
if (defined $newval) |
|
381
|
0 |
0 |
if (defined $fh) |
|
404
|
0 |
1 |
ref $_[0] ? : |
|
432
|
0 |
1 |
if ref $line or not defined $line |
|
433
|
0 |
1 |
unless $line |
|
439
|
0 |
1 |
defined $lde_orig ? : |
|
451
|
0 |
4 |
if (defined $lde) { } |
|
459
|
0 |
0 |
if ($match) |
|
478
|
4 |
0 |
if ($match) |
|
480
|
3 |
1 |
defined $1 ? : |
|
487
|
4 |
0 |
unless defined $lde |
|
489
|
4 |
0 |
if ($match) { } |
|
493
|
0 |
4 |
if defined $lde |
|
495
|
0 |
3 |
if defined $delim and length $delim and not length $line |
|
501
|
0 |
0 |
if ref $nl |
|
502
|
0 |
0 |
unless length "$nl$rs" |
|
507
|
0 |
1 |
if ($rec_err) |
|
514
|
0 |
1 |
if ($#{$$self{'linebuf'};} >= ++$linebuf_pos) { } |
|
522
|
0 |
1 |
if $rec_err |
|
550
|
0 |
1 |
if $$linebuf_pos + 1 >= $$self{'MAX_LINEBUF'} |
|
555
|
0 |
1 |
defined $lde_orig ? : |
|
557
|
1 |
0 |
unless ($$linebuf_pos < $#{$$self{'linebuf'};}) |
|
560
|
0 |
1 |
if ($fh) { } |
|
566
|
0 |
0 |
if (defined $lde) |
|
568
|
0 |
0 |
if $l =~ /__WORDLINETERMINATORESCAPE__/ |
|
578
|
0 |
0 |
if $nl =~ /__WORDLINETERMINATORESCAPE__/ |
|
587
|
0 |
1 |
if @{$$self{'textbuf'};} |
|
589
|
0 |
1 |
if (defined $lde) |
|
591
|
0 |
0 |
if $l =~ /__WORDLINETERMINATORESCAPE__/ |
|
600
|
0 |
0 |
if @{$$self{'textbuf'};} |
|
602
|
0 |
0 |
if $nl =~ /__WORDLINETERMINATORESCAPE__/ |
|
608
|
0 |
1 |
unless length $l |
|
614
|
0 |
1 |
if chomp $l |
|
615
|
0 |
1 |
if (substr($l, -1) eq "\r") |
|
619
|
0 |
1 |
if (substr($l, -1) eq $$self{'WORD_DELIMITER'} and not defined $lde) |
|
641
|
1 |
0 |
if (ref $_[0]) { } |
|
654
|
0 |
1 |
defined $lde_orig ? : |
|
658
|
4 |
0 |
if ($$self{'ALWAYS_QUOTE'} or not defined $lde || $$self{'NO_QUOTES'} and $field =~ /(?:$wd)|(?:$ld)|\"/s) { } |
|
|
0 |
0 |
elsif (defined $lde) { } |
|
|
0 |
0 |
elsif ($$self{'NO_QUOTES'}) { } |
|
674
|
0 |
1 |
if $$self{'RECADD'} |