| line |
true |
false |
branch |
|
135
|
0 |
4 |
unless exists $$object{'tests'} |
|
142
|
4 |
0 |
if exists $$object{'output'} |
|
163
|
0 |
4 |
unless exists $$obj{'output'} and *{$$obj{'output'};}{'IO'}->isa('IO::Handle') |
|
165
|
0 |
4 |
if $@ |
|
171
|
0 |
4 |
unless $$self{'_temp_file'} = 'File::Temp'->new('DIR', '/tmp', 'TEMPLATE', join('.', '', $basename, 'XXXXXXXX'), 'SUFFIX', '.' . int($$ ^ time & 65536), 'UNLINK', 0) |
|
214
|
0 |
4 |
unless exists $$self{'_io_handle'} and exists $$self{'_saved_handle'} |
|
234
|
0 |
0 |
if exists $$self{'_io_handle'} and exists $$self{'_saved_handle'} |
|
246
|
4 |
4 |
if ($cursize > $$self{'_buffer_size'}) |
|
269
|
4 |
4 |
unless exists $$self{'_temp_file'} |
|
273
|
4 |
0 |
if $unlink and -f $file |
|
359
|
0 |
0 |
unless @_ > 1 |