Re: How would I change a10 into A:10 in perl?

May be something like this:


$a = "a10, b10, C10";

$a =~ s/([a-z])([0-9]+)/\u\1\:\2/g;

print "$a\n";
[download]

UPDATE: Already shown by other monks!

Comment on Re: How would I change a10 into A:10 in perl? Download Code

Replies are listed 'Best First'.
Re^2: How would I change a10 into A:10 in perl? by GrandFather (Saint) on Dec 03, 2010 at 03:01 UTC
As the the warnings would have told you if you'd have tried running your code with strictures: `\1 better written as $1 at ... \2 better written as $2 at ...` [download] True laziness is hard work	[reply] [d/l]
Re^3: How would I change a10 into A:10 in perl? by JavaFan (Canon) on Dec 03, 2010 at 11:14 UTC
\1 and \2 are not stricture errors (use strict does not generate warnings - they are fatal errors). They are warnings, and require warnings to be turned on.	[reply]
Re^4: How would I change a10 into A:10 in perl? by GrandFather (Saint) on Dec 03, 2010 at 21:59 UTC
I tend to bundle warnings and strict together in a bundle I refer to as "strictures", as in "Always use strictures (use strict; use warnings; - see The strictures, according to Seuss).". True laziness is hard work	[reply]