Beefy Boxes and Bandwidth Generously Provided by pair Networks
XP is just a number

Re: regex for text manipulation

by snoopy (Deacon)
on Nov 07, 2007 at 06:39 UTC ( #649408=note: print w/replies, xml ) Need Help??

in reply to regex for text manipulation

Here's one possible solution:
#!/usr/bin/perl use warnings;use strict; foreach (<DATA>) { s{ (^|\.) # Start of string, or last full-stop (.*?) # Non-alpha characters (non-greedy) ([a-zA-Z]) # First alphabetic character ([^\.]*) # Through to next full stop }{ $1.$2.uc($3).lc($4) }gex; print; } __DATA__ today is wednesday.tomorrow IS THURSDAY. I am trying to write a regex to convert the first letter and any lette +r following a full stop in a string to uppercase .and . all the ot +her characters to lowercase.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://649408]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (7)
As of 2017-06-25 18:33 GMT
Find Nodes?
    Voting Booth?
    How many monitors do you use while coding?

    Results (568 votes). Check out past polls.