my @words = /([A-Z][a-z]*)/g;