search and replace the second occurrence

[jr8rdt]

Hi ,
how can I search and replace the second (or n) occurrence ?

this will replace ALL $b with $c

$a =~ s/$b/$c/g;

I just want to replace the 2nd $b with $c

Thanks

 

[PinkeyNBrain]

This may not be the most elegant, but should get you pretty close

$str = 'abc123abc456' ;
$b = 'abc';
$c = 'xyz' ;
$str =~ s/(.*?$b)(.*?)$b(.*)/$1$2$c$3/ ;

 

[prex1]

A bit simpler

$str=~s/$b(.*?)$b/$b$1$c/;

Franco

http://www.xcalcs.com

: Online engineering calculations

http://www.megamag.it

: Magnetic brakes for fun rides

http://www.levitans.com

: Air bearing pads

 

[PinkeyNBrain]

Simpler and faster by 17% to 20% (longer strings will get a better % rate). Good call.

 

[jr8rdt]

it works!!
Thanks