Hi, Try it simple

my $str = 'test("test..hai")';
$str =~ s#\Qtest("test\E#test("GC_test#gsi;
print "$str";
[download]