in reply to Re: change [A-Z] to U, [a-z] to L with one regex?
in thread change [A-Z] to U, [a-z] to L with one regex?
Simpler solution not limited to non-ASCII chars:
s/(\p{Lu})|\p{Ll}/ defined($1) ? 'U' : 'L' /eg;
In Section
Seekers of Perl Wisdom
in reply to Re: change [A-Z] to U, [a-z] to L with one regex?
in thread change [A-Z] to U, [a-z] to L with one regex?
Simpler solution not limited to non-ASCII chars:
s/(\p{Lu})|\p{Ll}/ defined($1) ? 'U' : 'L' /eg;