| line |
true |
false |
branch |
|
52
|
0 |
0 |
if ref $_[0] or $_[0] =~ /^Bio::Polloc::/
|
|
131
|
8 |
10 |
if defined $value
|
|
141
|
5 |
0 |
if $self->file
|
|
142
|
0 |
0 |
if $self->_fh
|
|
152
|
0 |
0 |
if defined $$self{'_mode'}
|
|
153
|
0 |
0 |
unless my $fh = $self->_fh
|
|
157
|
0 |
0 |
if (defined $line) { }
|
|
172
|
10 |
246 |
if (defined $$self{'_filehandle'})
|
|
174
|
0 |
8 |
if \*STDOUT == $self->_fh or \*STDIN == $self->_fh or \*STDERR == $self->_fh
|
|
177
|
0 |
8 |
unless (ref $$self{'_filehandle'} and not $$self{'_filehandle'}->isa('IO::String'))
|
|
192
|
0 |
10 |
unless defined $$self{'_filehandle'}
|
|
194
|
10 |
0 |
if (ref($$self{'_filehandle'}) =~ /GLOB/) { }
|
|
209
|
0 |
100 |
unless ref $self or $exe
|
|
210
|
0 |
100 |
if $^O =~ /mswin/i and not $exe =~ /\.(exe|com|bat|cmd)$/i
|
|
211
|
0 |
100 |
if -e $exe
|
|
214
|
0 |
700 |
if -e $f and -x $f
|
|
228
|
0 |
0 |
unless defined $dir
|
|
229
|
0 |
0 |
unless defined $unlink
|
|
232
|
0 |
0 |
if $template
|
|
233
|
0 |
0 |
if defined $suffix
|
|
234
|
0 |
0 |
if defined $dir
|
|
235
|
0 |
0 |
if defined $unlink
|
|
238
|
0 |
0 |
if $unlink
|
|
239
|
0 |
0 |
wantarray ? :
|
|
282
|
0 |
372 |
unless my $fh = $self->_fh
|
|
285
|
8 |
364 |
unless defined $$self{'_readbuffer'}
|
|
286
|
0 |
372 |
if (@{$$self{'_readbuffer'};}) { }
|
|
292
|
364 |
8 |
if (defined $line)
|
|
305
|
0 |
0 |
unless $line
|
|
316
|
0 |
250 |
if (exists $$self{'_rootio_tempfiles'} and ref($$self{'_rootio_tempfiles'}) =~ /array/i)
|
|
332
|
0 |
255 |
if ($createtemp)
|
|
337
|
0 |
255 |
if ($url)
|
|
346
|
0 |
0 |
if $http_result == 200
|
|
350
|
0 |
0 |
if $http_result != 200
|
|
357
|
0 |
255 |
if ($input)
|
|
358
|
0 |
0 |
if (ref \$input eq 'SCALAR') { }
|
|
|
0 |
0 |
elsif (ref $input and ref $input eq 'GLOB' || $input->isa('IO::Handle')) { }
|
|
359
|
0 |
0 |
if $file and $file ne $input
|
|
368
|
0 |
8 |
if defined $file and defined $fh and not $createtemp
|
|
371
|
8 |
246 |
if (not defined $fh and defined $file and $file ne '')
|
|
373
|
0 |
8 |
unless open $fh, $file
|
|
376
|
9 |
246 |
if $fh
|
|
377
|
0 |
255 |
defined $flush ? :
|
|
387
|
9 |
402 |
if defined $value
|
|
397
|
255 |
0 |
if defined $value
|