s/(')/\Q$1$1/g;  # Or
s/'/\Q''/g;