s/(')/quotemeta "$1$1"/eg;