$sub_string =~ s/$sub_in/$sub_out/g;