[racket] Call racket with long code from racket

I am trying to call racket with long code from racket
-----------
#lang racket
(require racket/system)
(display (port->string (car (process     "racket -e ' [long-code] ' "))))
-----------

But long-code contain  "  and  '   .
Thus

(process     "racket -e ' [long-long-code] ' "))

does not work.

How to  call racket with long code ( contain "  and  '    ) from racket

Saving long-code into file can not use. Because this is part of web application.