perl related misc