Lines Matching refs:word
173 foreach my $word (@words) {
174 last if ($word =~ m/^#/);
175 push (@conf_args, $word);
241 foreach my $word (@array) {
242 $word =~ s/\s*\n?$//g;
243 $word =~ s/^\s*//g;
244 $word =~ s/\s+/ /g;
245 $word =~ tr/[a-z]/[A-Z]/;
247 next if ($word =~ m/^\s*#/);
248 next if ($word =~ m/^\s*$/);
250 $hashRef->{$word}++;
259 foreach my $word (sort keys %$hashRef) {
260 print " $word";
4692 my $word = $1;
4693 next if ($word !~ /[A-Z][a-z]|[a-z][A-Z]/);
4701 if (!defined $camelcase{$word}) {
4702 $camelcase{$word} = 1;
4704 "Avoid CamelCase: <$word>\n" . $herecurr);