$text =~ s/(some\s)/$1$insert/sg;