Help for this page
'Co' => 58.933195 ... my $mult = $2 || 1; $weight += ($eweight*$mult); print STDERR "Adding $1 ($eweight)* $mult\n";
Adding Co (58.933195)* 1 Adding C (12)* 1 Adding O (16)* 2 Molecule: Co C O2 Weight of Co C O2 : 102.933195