$file =~ s/([\\'])/\\$1/g;