Beefy Boxes and Bandwidth Generously Provided by pair Networks
Keep It Simple, Stupid
 
PerlMonks  

Re: change [A-Z] to U, [a-z] to L with one regex?

by rjt (Deacon)
on Mar 19, 2013 at 23:05 UTC ( #1024399=note: print w/replies, xml ) Need Help??


in reply to change [A-Z] to U, [a-z] to L with one regex?

You can always use $_:

$_ = "SomEThingWithMIXEDRegiSter\n"; y/A-Z/U/, y/a-z/L/; print;

Yes, this is technically still two expressions, but as others have stated, it'll be efficient, and to me, anyway, the comma operator has good semantic meaning, here, even though a semicolon would do just as well.

Update: Corrected bracket typo in y///. Thanks jwkrahn.

Replies are listed 'Best First'.
Re^2: change [A-Z] to U, [a-z] to L with one regex?
by jwkrahn (Monsignor) on Mar 20, 2013 at 05:32 UTC

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1024399]
help
Chatterbox?
[james28909]: seek DATA, 0, 0; while (<DATA>) { print; }
[Lady_Aleena]: Sounds interesting. Have you written a meditation or cool use for it?
[Lady_Aleena]: It might be something PerlMonks at large would be interested in.

How do I use this? | Other CB clients
Other Users?
Others imbibing at the Monastery: (3)
As of 2017-05-01 00:12 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    I'm a fool:











    Results (543 votes). Check out past polls.