line |
true |
false |
branch |
125
|
33 |
33 |
if $fh->eof |
144
|
0 |
33 |
unless defined($_ = readline $fh) |
152
|
0 |
439 |
unless defined(my $line = readline $fh) |
157
|
0 |
439 |
if $OLD_CHARGE_MAP{$charge} |
158
|
0 |
439 |
if $charge and $charge == 4 |
161
|
1 |
438 |
if (int $mass and eval {
do {
require Chemistry::Isotope
}
}) { } |
|
0 |
438 |
elsif (int $mass) { } |
182
|
0 |
451 |
unless defined($_ = readline $fh) |
185
|
450 |
1 |
$type =~ /^[123]$/ ? : |
191
|
9 |
442 |
if ($mol->isa('Chemistry::Pattern')) |
198
|
33 |
13 |
if (/^M END/ or /^\$\$\$\$/) { } |
|
12 |
1 |
elsif (/^M (...)/) { } |
201
|
10 |
2 |
if ($1 eq 'CHG' or $1 eq 'RAD') |
208
|
12 |
0 |
if $self->can($method) |
221
|
33 |
0 |
if ($opts{'slurp'}) |
227
|
2 |
31 |
if ($mol->isa('Chemistry::Pattern')) |
239
|
1 |
8 |
if $s |
241
|
1 |
8 |
if $s |
242
|
1 |
8 |
if (@bond_exprs) { } |
251
|
0 |
1 |
if $DEBUG |
262
|
103 |
35 |
$patt->aromatic ? : |
294
|
0 |
1 |
unless $line =~ /^M ALS (...)(...) (.)/ |
297
|
0 |
1 |
$exclude =~ /^[Tt]$/ ? : |
310
|
1 |
0 |
if ($mol->isa('Chemistry::Pattern')) |
318
|
0 |
1 |
if $DEBUG |
319
|
0 |
1 |
if $DEBUG |
358
|
1 |
175 |
if $atom->formal_charge |
359
|
2 |
174 |
if $atom->mass_number |
360
|
1 |
175 |
if $atom->formal_radical |
372
|
0 |
1 |
@charged_atoms > 8 ? : |
380
|
0 |
1 |
@isotope_atoms > 8 ? : |
388
|
0 |
1 |
@radical_atoms > 8 ? : |