Branch Coverage

blib/lib/TIGR/FASTA/Writer.pm
Criterion Covered Total %
branch 0 38 0.0


line true false branch
103 0 0 if (scalar @method_args > 0 and ref($method_args[0]) =~ /foundation/i) { }
115 0 0 if (scalar @method_args > 0 and ref($method_args[0]) =~ /array/i) { }
128 0 0 if (scalar @method_args > 0 and not ref $method_args[0]) { }
131 0 0 if (defined $filename) { }
149 0 0 if (scalar @method_args > 0) { }
0 0 elsif (defined $self->{'db_file_name'} and not defined $self->open($self->{'db_file_name'}, 'w')) { }
160 0 0 $error_condition == 0 ? :
183 0 0 unless (defined $open_flags and $open_flags =~ /^w$/i || $open_flags =~ /^a$/i)
190 0 0 if (defined $self->{'db_handle'})
194 0 0 unless (defined $db_file_name and $self->{'db_file_name'} = $db_file_name and defined $self->{'db_file_name'} and defined($self->{'db_handle'} = 'IO::File'->new($self->{'db_file_name'}, $open_flags)))
206 0 0 $error_condition == 1 ? :
224 0 0 if (defined $self->{'db_handle'})
226 0 0 unless (defined $return_val)
254 0 0 if (defined $fasta_obj and ref($fasta_obj) =~ /fastarecord/i and defined $self->{'db_handle'}) { }
258 0 0 if ($self->{'db_handle'}->print($fasta_obj->toString)) { }
297 0 0 if (defined $message and defined $tf_level and defined $log_facility)
301 0 0 if (defined $self->{'foundation'})
302 0 0 if ($log_facility != $USR_ERR) { }
310 0 0 if (defined $self->{'error_ref'} and $log_facility == $USR_ERR)