perl pod stuff fixed