Re: uc() every other letter

by thunders (Priest)

on Sep 28, 2001 at 18:49 UTC ( [id://115401]=note: print w/replies, xml )

Need Help??

I would use Sifmole's solution
but here's a fairly silly way to do it.

for(97..122){
    $init = chr; $rep = uc($init);
    eval '$string =~'."s/$init/$rep/g" if $_ % 2
}
[download]

Comment on Re: uc() every other letter Download Code

Domain Nodelet^?

Node Status^?

node history
Node Type: note [id://115401]
help

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others romping around the Monastery: (1)

As of 2024-04-25 03:30 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Voting Booth^?

No recent polls found