$new_type =~ s/([a-z])([A-Z])/${1}::${2}/g;