perl -wle '  my $t = "Hallo & Gruess Gott."; $t =~ s/&/,/; print ">$t<"; '
>Hallo , Gruess Gott.<