Select Code to Download

hello
hello{1,2}
...
$someotherstring$
{a,b}%{1,2}
{a,b}%%{1,2}

hello
hello1
...
a
b
b

amines->{CN(C),{C,c}N(H)}
thiols->{{C,c}S}
...
products->{ $nSynthons$**{$eSynthons$%$lGroups$} }

$reactants$>>$products$

CN(C)(H).ClC(=O)C>>CN(C)C(=O)C
CN(C)(H).ClC(=O)c>>CN(C)C(=O)c
...
cS(=O)(=O)N(H)(H).BrC(=O)c>>cS(=O)(=O)N(H)C(=O)c
cS(=O)(=O)N(H)(H).IC(=O)C>>cS(=O)(=O)N(H)C(=O)C
cS(=O)(=O)N(H)(H).IC(=O)c>>cS(=O)(=O)N(H)C(=O)c

#!/usr/bin/perl

...
Parse::RecDescent->Precompile($grammar, 'Grammar')
   or die("Bad grammar\n");

#!/usr/bin/perl

...
}

exit;