Branch Coverage

blib/lib/HackaMol/Roles/ReadPdbxRole.pm
Criterion Covered Total %
branch 13 108 12.0


line true false branch
22 0 0 if (/^loop_/)
25 0 0 if (/^#/ and $in_loop)
29 0 0 if (/^_pdbx_database_status.recvd_initial_deposition_date\s+(\S+)/)
32 0 0 if (/^_pdbx_audit_revision_history.revision_date\s*(\S+)?/)
34 0 0 if ($in_loop)
37 0 0 if ($line =~ /^\#/)
49 0 0 if (/^_pdbx_struct_assembly_gen.asym_id_list\s*(\S+)?/)
51 0 0 if ($1) { }
57 0 0 if $line =~ /^(;\s*$|#)/
58 0 0 if ($line =~ /^;/)
106 0 0 if (/^_entity_poly.entity_id\s*(\d+)?/)
111 0 0 if ($entity_id) { }
112 0 0 if $in_loop
117 0 0 if ($line =~ /^_entity_poly\.pdbx_seq_one_letter_code\s+(\S+)?\s*$/)
119 0 0 if ($1) { }
125 0 0 if $next_line =~ /^;\s*$/
131 0 0 if ($line =~ /^_entity_poly\.pdbx_seq_one_letter_code_can\s+(\S+)?\s*$/)
133 0 0 if ($1) { }
139 0 0 if $next_line =~ /^;\s*$/
145 0 0 if $line =~ /^#/
154 0 0 unless $in_loop
160 0 0 if ($line =~ /^(_entity_poly.\S+)/)
164 0 0 if ($line =~ /^\#/)
177 0 0 if ($next_line =~ /^;/) { }
182 0 0 if $seq_line =~ /;\s*$/
193 0 0 if scalar @tokens != scalar @labels
197 0 0 if $tokens[$i] eq '.' or $tokens[$i] eq '?'
228 0 0 if (/^_struct_keywords.text\s*(?:\'?(.+)\'?)?\s*$/)
229 0 0 if ($1) { }
235 0 0 if $line =~ /^#/
241 0 0 if (/^_exptl\.(\S+)\s*(?:\'(.+)\')?/)
242 0 0 if ($1 eq 'method') { }
0 0 elsif ($in_loop) { }
249 0 0 if ($line =~ /^(_exptl\S+)/)
254 0 0 if ($line =~ /^\#/)
261 0 0 if scalar @tokens != scalar @labels
274 0 0 if $line =~ /^#/
275 0 0 if ($line =~ /^_exptl\.method\s+(?:\'(.+)\')?/)
276 0 0 unless $1
284 0 0 if (/^_refine_hist\.d_res_high\s+(\d+\.\d+)/)
287 0 0 if (/^_em_3d_reconstruction.resolution\s+(\d+\.\d+)/)
290 0 0 if (/^_citation.pdbx_database_id_DOI\s+(\S+)/)
293 0 0 if (/^_atom_site.group_PDB/)
335 0 1 wantarray ? :
454 0 9 if (/^_atom_site.Cartn_x_esd/)
458 1 8 if /^_atom_site.pdbx_PDB_model_num/
460 1 7 if (/^_atom_site.group_PDB/)
463 0 14 unless $line =~ /$expected_labels[$i]\s?/
464 1 13 if $line =~ /^_atom_site.B_iso_or_equiv/
471 0 62 if ($self->has_readline_func)
472 0 0 if $self->readline_func->($_) eq 'PDB_SKIP'
475 0 62 if /^#/
477 62 0 if (/^(?:HETATM|ATOM)\s/)
486 0 1 if (keys %model_atom_count > 1)