simple perl script not working

vinaytp · 06-19-2009, 12:43 AM

hi all.......

$string='summary';
if($test =~m/($string)/i)
{
$test=~ s/$1/$string/g;
}

here substitution not taking place even if summary word present in $test
is there any mistake in the code....

can anyone please help me...

Thanks in advance....

vinaytp · 06-19-2009, 01:13 AM

Quote:

Originally Posted by vinaytp

hi all.......

$string='summary';
if($test =~m/($string)/i)
{
$test=~ s/$1/$string/g;
}

here substitution not taking place even if summary word present in $test
is there any mistake in the code....

can anyone please help me...

Thanks in advance....

I got it correct i was matching test instead of text ...that was the mistake...