Add perl section