$insert =~ s/(?<!\s)'|(?<!^)'/\\'/g ; # wrong result :(
$insert =~ s/(?<![^\s]/\\'/g ; # nope again