| line |
true |
false |
branch |
|
443
|
0 |
558 |
unless defined $pformat |
|
459
|
3 |
0 |
unless (defined $ifmt or defined $ofmt) |
|
463
|
4 |
137 |
unless defined $ofmt |
|
469
|
2 |
139 |
if ($glb_Iformat =~ /^$ifmt:/ and $glb_Oformat =~ /^$ofmt:/) |
|
480
|
0 |
139 |
if ($ifmt eq '') { } |
|
|
139 |
0 |
elsif (($fmti, $cset) = &load_format($ifmt)) { } |
|
485
|
0 |
139 |
if $cset eq 'auto' and $fmti ne 'auto' |
|
492
|
0 |
139 |
if ($ofmt eq '') { } |
|
|
139 |
0 |
elsif (($fmto, $cset) = &load_format($ofmt)) { } |
|
496
|
0 |
139 |
if $cset eq 'auto' and $fmto ne 'auto' |
|
502
|
137 |
2 |
if $fmto ne 'auto' |
|
509
|
5 |
134 |
if ($success == 2 and $fmti ne $fmto) |
|
563
|
0 |
139 |
unless defined $file |
|
567
|
137 |
2 |
if ($file =~ /^>>(.*)/) { } |
|
|
0 |
2 |
elsif ($file =~ /^>(.*)/) { } |
|
575
|
0 |
139 |
if $name eq 'STDIN' |
|
576
|
0 |
139 |
if $name eq 'STDOUT' |
|
577
|
0 |
139 |
if $name eq 'STDERR' |
|
581
|
2 |
137 |
if ($name ne '-') |
|
582
|
2 |
0 |
if ($mode eq 'read') { } |
|
583
|
0 |
2 |
if defined $glb_Orfmt{$name} |
|
585
|
0 |
2 |
if defined $glb_Irfmt{$name} |
|
587
|
0 |
0 |
if defined $glb_Irfmt{$name} |
|
589
|
0 |
0 |
if defined $glb_Orfmt{$name} |
|
595
|
0 |
139 |
if (defined $format) { } |
|
596
|
0 |
0 |
unless ($fmt, $cset) = &load_format($format) |
|
598
|
2 |
137 |
if ($mode eq 'read') { } |
|
605
|
2 |
137 |
if ($mode eq 'read') { } |
|
610
|
0 |
2 |
if $name eq '-' |
|
615
|
137 |
0 |
if $name eq '-' |
|
625
|
139 |
0 |
if (defined $fmt) { } |
|
627
|
2 |
137 |
if ($cset eq 'auto') { } |
|
633
|
2 |
137 |
if ($mode eq 'read') { } |
|
651
|
0 |
139 |
if (wantarray) { } |
|
681
|
2 |
0 |
unless defined $file |
|
685
|
0 |
2 |
if ($file =~ /^>(.*)/) { } |
|
691
|
0 |
2 |
unless defined $result |
|
693
|
0 |
2 |
unless defined $result |
|
704
|
0 |
2 |
unless defined $glb_Irfmt{$name} |
|
718
|
2 |
0 |
if ($name eq $glb_Ifilename) |
|
729
|
0 |
0 |
unless defined $glb_Orfmt{$name} |
|
741
|
0 |
0 |
if ($name eq $glb_Ofilename) |
|
756
|
134 |
0 |
unless defined $file |
|
758
|
0 |
134 |
unless (defined $glb_Irfmt{$file}) |
|
765
|
0 |
134 |
if (defined $format and $format ne $glb_Irfmt{$file}) { } |
|
766
|
0 |
0 |
unless ($fmt, $cset) = &load_format($format) |
|
794
|
0 |
0 |
unless defined $file |
|
795
|
0 |
0 |
unless defined $out |
|
797
|
0 |
0 |
unless (defined $glb_Orfmt{$file}) |
|
801
|
0 |
0 |
if (defined $format and $format ne $glb_Orfmt{$file}) { } |
|
802
|
0 |
0 |
unless ($fmt, $cset) = &load_format($format) |
|
838
|
0 |
0 |
unless defined $recin |
|
858
|
0 |
0 |
if $glb_debug |
|
859
|
0 |
0 |
if ($ifmt eq 'auto') |
|
860
|
0 |
0 |
unless defined $glb_Ifilename |
|
863
|
0 |
0 |
if ($icset eq 'auto') |
|
864
|
0 |
0 |
unless defined $glb_Ifilename |
|
867
|
0 |
0 |
if ($ofmt eq 'auto') |
|
868
|
0 |
0 |
if (defined $glb_Ofilename) { } |
|
874
|
0 |
0 |
if ($ocset eq 'auto') |
|
875
|
0 |
0 |
if (defined $glb_Ofilename) { } |
|
881
|
0 |
0 |
if $glb_debug |
|
883
|
0 |
0 |
if ($ifmt eq $ofmt) |
|
885
|
0 |
0 |
if $icset eq $ocset |
|
887
|
0 |
0 |
unless $opt_CSConvert |
|
907
|
0 |
0 |
if (defined $glb_cvtname) |
|
914
|
0 |
0 |
if $glb_debug |
|
938
|
0 |
132 |
unless defined $recin |
|
940
|
0 |
132 |
if (defined $file) { } |
|
941
|
0 |
0 |
if (defined $glb_Irfmt{$file}) { } |
|
|
0 |
0 |
elsif (defined $glb_Orfmt{$file}) { } |
|
950
|
0 |
0 |
if $glb_debug |
|
952
|
132 |
0 |
if (defined $glb_Ifilename) { } |
|
958
|
0 |
132 |
if $glb_debug |
|
987
|
0 |
0 |
if (defined $file) { } |
|
988
|
0 |
0 |
if (defined $glb_Orfmt{$file}) { } |
|
|
0 |
0 |
elsif (defined $glb_Irfmt{$file}) { } |
|
997
|
0 |
0 |
if $glb_debug |
|
999
|
0 |
0 |
if (defined $glb_Ofilename) { } |
|
1005
|
0 |
0 |
if $glb_debug |
|
1014
|
0 |
0 |
if ($recout =~ /$cs_escape/o and $fmt ne 'canon') |
|
1015
|
0 |
0 |
if $recout =~ s[$cs_sep][/]go |
|
1016
|
0 |
0 |
if $recout =~ s[$cs_sep2][/]go |
|
1017
|
0 |
0 |
if $recout =~ s/${cs_escape}[^e]//g |
|
1030
|
0 |
132 |
if (defined $file) { } |
|
1033
|
0 |
0 |
unless (defined $fmt) |
|
1037
|
0 |
0 |
unless defined $fmt |
|
1038
|
0 |
0 |
if $glb_debug |
|
1040
|
132 |
0 |
if (defined $glb_Ifilename) |
|
1048
|
0 |
132 |
unless defined $fmt |
|
1049
|
0 |
132 |
if $glb_debug |
|
1055
|
132 |
0 |
if ($opt_CSConvert) |
|
1057
|
132 |
0 |
if (defined $charsets{join $;, $cset, 'toesc'}) { } |
|
1069
|
1912 |
84 |
unless $val =~ /$teststr/ |
|
1095
|
0 |
132 |
if (defined $file) { } |
|
1098
|
0 |
0 |
unless (defined $fmt) |
|
1102
|
0 |
0 |
unless defined $fmt |
|
1103
|
0 |
0 |
if $glb_debug |
|
1105
|
132 |
0 |
if (defined $glb_Ofilename) |
|
1109
|
0 |
132 |
unless defined $fmt |
|
1110
|
0 |
132 |
if $glb_debug |
|
1122
|
132 |
0 |
if ($opt_CSConvert) |
|
1125
|
132 |
0 |
if (defined $charsets{join $;, $cset, 'fromesc'}) { } |
|
1129
|
2122 |
6 |
unless $val =~ /$teststr/ |
|
1149
|
2 |
0 |
unless (defined $file) |
|
1153
|
0 |
0 |
if ($file =~ /^>(.*)/) { } |
|
1157
|
0 |
0 |
unless defined $fmt |
|
1159
|
0 |
0 |
unless defined $fmt |