| line |
true |
false |
branch |
|
29
|
3 |
29 |
if (wantarray) |
|
34
|
2 |
8 |
if ($blib == 0 and $MVS::VBFile::bdws) |
|
38
|
1 |
1 |
if ($n < 4) |
|
45
|
2 |
26 |
if ($n < 4) |
|
46
|
2 |
0 |
unless $MVS::VBFile::bdws |
|
53
|
0 |
26 |
if ($n != $reclen) |
|
56
|
20 |
6 |
if $MVS::VBFile::bdws |
|
57
|
3 |
23 |
if $MVS::VBFile::keep_rdw |
|
70
|
2 |
8 |
if ($blib == 0 and $MVS::VBFile::bdws) |
|
74
|
1 |
1 |
if ($n < 4) |
|
81
|
2 |
26 |
if ($n < 4) |
|
82
|
2 |
0 |
unless $MVS::VBFile::bdws |
|
89
|
0 |
26 |
if ($n != $reclen) |
|
93
|
20 |
6 |
if $MVS::VBFile::bdws |
|
94
|
3 |
23 |
if $MVS::VBFile::keep_rdw |
|
110
|
0 |
1 |
if $blksize < 9 |
|
111
|
0 |
1 |
if $blksize > 262144 |
|
124
|
0 |
400 |
unless $FH |
|
125
|
0 |
400 |
unless $record |
|
129
|
5 |
395 |
if ($L + length($MVS::VBFile::outblock{$FH}) > $blksize) |
|
143
|
0 |
6 |
unless print $FH $outrec |
|
152
|
0 |
1 |
unless $FH |
|
154
|
1 |
0 |
if length $MVS::VBFile::outblock{$FH} > 4 |
|
161
|
0 |
1 |
unless $FH |