$str =~ s/'/''/g