Posted By

noah on 07/03/07


Tagged

text filter capitalize upcase


Versions (?)

Who likes this?

1 person have marked this snippet as a favorite

melling


capitalize words


 / Published in: Perl
 

  1. sub wordcaps {
  2. my $line = shift;
  3. $line =~ s/\b(\w)/\U$1/g;
  4. return $line;
  5. }

Report this snippet  

You need to login to post a comment.