Branch Coverage

blib/lib/TIGR/FASTA/Iterator.pm
Criterion Covered Total %
branch 0 104 0.0


line true false branch
122 0 0 if (scalar @method_args > 0 and ref($method_args[0]) =~ /foundation/i) { }
134 0 0 if (scalar @method_args > 0 and ref($method_args[0]) =~ /array/i) { }
146 0 0 if (scalar @method_args > 0 and not ref $method_args[0]) { }
149 0 0 if (defined $filename) { }
166 0 0 if (scalar @method_args > 0) { }
0 0 elsif (defined $self->{'db_file_name'} and not defined $self->open($self->{'db_file_name'})) { }
176 0 0 $error_condition == 0 ? :
197 0 0 if (defined $self->{'db_handle'})
204 0 0 if (not defined $db_file_name && ($self->{'db_file_name'} = $db_file_name) && defined $self->{'db_file_name'}) { }
0 0 elsif (not defined($self->{'db_handle'} = 'IO::File'->new($self->{'db_file_name'}))) { }
223 0 0 if ($error_condition == 1)
227 0 0 $error_condition == 1 ? :
245 0 0 if (defined $self->{'db_handle'})
247 0 0 unless ($return_val)
275 0 0 if ($line_number == 0)
280 0 0 defined $self->{'db_handle'} ? :
282 0 0 if (defined $db_handle)
286 0 0 if (defined $newline)
298 0 0 if (defined $next_header and $next_header ne '')
316 0 0 if ($self->_parse == 1)
323 0 0 if (defined $recordarray_ref and ref($recordarray_ref) =~ /array/i)
329 0 0 if (defined $recordarray_ref and $array_length = @recordarray and $array_length > 0)
338 0 0 if (scalar @recordarray > 0)
347 0 0 if (defined $record)
371 0 0 if (defined $recordarray_ref and ref($recordarray_ref) =~ /array/i)
376 0 0 if (defined $recordarray_ref and $array_length = @recordarray and $array_length > 0)
385 0 0 if (scalar @recordarray > 0)
393 0 0 if (defined $record)
444 0 0 defined $self->{'db_handle'} ? :
450 0 0 unless (defined $header)
452 0 0 if (defined $newline and $newline ne '')
458 0 0 if (&isValidFASTAheader($header) != 0) { }
471 0 0 if (defined $header and defined $line_number)
486 0 0 if (defined $record_identifier and not $record_identifier =~ // and &isValidFASTAdata($line) != 0) { }
0 0 elsif ($line =~ /^>/) { }
491 0 0 if ($preceding_header_flag == 1)
497 0 0 if (defined $first_data_line_length)
498 0 0 if ($last_line_length_lt_std_flag == 1)
512 0 0 if (length $line > $first_data_line_length) { }
0 0 elsif (length $line < $first_data_line_length) { }
534 0 0 if ($preceding_record_flag == 1)
547 0 0 if ($line =~ /$UNBOUND_FASTA_SEPARATOR/) { }
0 0 elsif ($last_line_length_lt_std_flag == 1) { }
0 0 elsif (defined $record_identifier and not $record_identifier =~ //) { }
577 0 0 if ($preceding_header_flag == 1)
582 0 0 $self->{'error_cnt'} == 0 ? :
597 0 0 unless (defined $line_number)
602 0 0 if ($self->{'db_handle'}->eof == 1) { }
636 0 0 if (defined $message and defined $tf_level and defined $log_facility)
640 0 0 if (defined $self->{'foundation'})
641 0 0 if ($log_facility != $USR_ERR) { }
649 0 0 if (defined $self->{'error_ref'} and $log_facility == $USR_ERR)