my $molform = <STDIN>;