string a = "A string";
string b = a;
a =~ s/$/\./;
puts(a);
puts(b);