Beefy Boxes and Bandwidth Generously Provided by pair Networks
There's more than one way to do things
 
PerlMonks  

Re: regex for text manipulation

by gube (Parson)
on Nov 07, 2007 at 07:27 UTC ( #649422=note: print w/ replies, xml ) Need Help??


in reply to regex for text manipulation

#!/usr/local/bin/perl my $str = "today is wednesday.tomorrow IS THURSDAY"; $str =~ s/^(\w)(.*?)([.])(\w)(.*)/uc($1).lc($2).lc($3).uc($4).lc($5)/g +ei; print $str;
o/p: Today is wednesday.Tomorrow is thursday


Comment on Re: regex for text manipulation
Download Code
Re^2: regex for text manipulation
by sen (Hermit) on Nov 07, 2007 at 07:50 UTC

    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;

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://649422]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others browsing the Monastery: (6)
As of 2014-07-30 22:57 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My favorite superfluous repetitious redundant duplicative phrase is:









    Results (241 votes), past polls