perl release down