fix perl setting