The perl script for polymer crosslinking

hello everyone

Where can I get the perl script for polymer crosslinking