Problems? Is your data what you think it is? PerlMonks

### Re: Efficient way to replace a set of values with another set of values

by Cody Fendant (Friar)
 on Nov 23, 2012 at 10:39 UTC ( #1005245=note: print w/replies, xml ) Need Help??

\$str = q{ 1. This is just a sample. 2. This is to check 3. How a set of values 4. can be replaced by another 5. set of values and that too 6. in the most efficient way. }; \$str =~ s/^(\d)/chr(\$1+96)/meg; print \$str; ### prints: a. This is just a sample. b. This is to check c. How a set of values d. can be replaced by another e. set of values and that too f. in the most efficient way.
• Comment on Re: Efficient way to replace a set of values with another set of values

Replies are listed 'Best First'.
Re^2: Efficient way to replace a set of values with another set of values
by Arunbear (Prior) on Nov 23, 2012 at 10:48 UTC
Command line version:
perl -pi -e 's/^(\d)/chr(\$1+96)/e' myfile
Parent beat me to the one line solution, but perhaps a minor mod may be needed; I suspect that the OP may have numbers larger than just 1-6, so perhaps:
perl -pi -e 's/^(\d+)/chr(\$1+96)/e' myfile
A Monk aims to give answers to those who have none, and to learn from those who know more.

OK, your solution is a bit better .... at least until you get to "27. This is a really long list!".

;^D

...roboticus

When your only tool is a hammer, all problems look like your thumb.

Create A New User
Node Status?
node history
Node Type: note [id://1005245]
help
Chatterbox?
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others avoiding work at the Monastery: (3)
As of 2018-06-23 01:16 GMT
Sections?
Information?
Find Nodes?
Leftovers?
Voting Booth?
Should cpanminus be part of the standard Perl release?

Results (125 votes). Check out past polls.

Notices?