|
|
|
| go ahead... be a heretic | |
| PerlMonks |
Re^2: regex for text manipulationby sen (Hermit) |
| on Nov 07, 2007 at 07:50 UTC ( [id://649424]=note: print w/replies, xml ) | Need Help?? |
|
hi, The third match is the dot, then why the need of lc($3), i think $3 is enough. $str =~ s/^(\w)(.*?)([.])(\w)(.*)/uc($1).lc($2).($3).uc($4).lc($5)/gei;
In Section
Seekers of Perl Wisdom
|
|
||||||||||||||||||||||