$new_type =~ s/([a-z])([A-Z])/"$1::$2"/g;
#"$1::$2" - strings are a monks best friend