Select Code to Download

#!/usr/bin/perl -w

...
$str_out =~ s/"/"GC_/;
print "string 1: $str_in\n";
print "string 2: $str_out\n";

string 1: test("test
string 2: test("GC_test