parallel perl fix