Change regex in spawn-perl.js

To fix issue #1.