$string=""; $newContent = "Test String"; $string =~ s/()/$1$newContent/g;