Edit File: perluserdir.swg
#define %perlcode %insert("perl")