Beefy Boxes and Bandwidth Generously Provided by pair Networks
We don't bite newbies here... much
 
PerlMonks  

Answer: How would I replace the string 'Red1' with $Red[1]?

( #20367=categorized answer: print w/ replies, xml ) Need Help??

Q&A > regular expressions > How would I replace the string 'Red1' with $Red[1]? contributed by QandAEditors

Use an array (or a hash). What you're trying to do now smells like symbolic refrences, which are just yicky (to use the technical term ) and make your code harder to write and maintain.

You will also need to use the /e modifier (which causes Perl to eval the right-side as an expression).

use strict; my @red; $red[1]='black'; $red[2]='red'; $line =~ s/\$red(\d)/$red[$1]/ge; +

Comment on Answer: How would I replace the string 'Red1' with $Red[1]?
Download Code
Log In?
Username:
Password:

What's my password?
Create A New User
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others avoiding work at the Monastery: (7)
As of 2015-07-07 04:52 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (87 votes), past polls