perl capitalization