The perl will create head file.