| line |
true |
false |
branch |
|
203
|
0 |
16 |
if $format =~ s/(?
|
|
206
|
1 |
15 |
if ($opts{'formula_sort'}) { } |
|
217
|
1 |
2 |
$n > 1 ? : |
|
218
|
29 |
11 |
$n > 1 ? : |
|
228
|
13 |
2 |
if ($$formula_hash{'C'}) { } |
|
264
|
0 |
16 |
unless ParensBalanced($formula) |
|
278
|
5 |
11 |
$formula =~ s/^(\d+\.?\d*)// ? : |
|
291
|
15 |
20 |
if (defined $extract and $extract ne '') { } |
|
293
|
13 |
2 |
if ($remainder =~ s/^(\d+\.?\d*)(.*)$/$2/) { } |
|
300
|
10 |
5 |
if $prefix ne '' |
|
303
|
4 |
11 |
if $remainder ne '' |
|
311
|
20 |
0 |
if $remainder ne '' |
|
321
|
0 |
30 |
unless $formula =~ /^(?:([A-Z][a-z]*)(\d+\.?\d*)?)+$/o |
|
325
|
29 |
26 |
unless defined $count |
|
326
|
18 |
37 |
if (defined $elements{$elm}) { } |
|
347
|
12 |
12 |
if ($current =~ /[<({\[]/) |
|
351
|
0 |
12 |
if scalar @stack == 0 |
|
352
|
0 |
12 |
if $current ne $pairs{pop @stack} |
|
354
|
0 |
16 |
@stack ? : |