Use good perl