/**
     * Returns the script to execute when the request must be insulated.
     *
     * @param Request $request A Request instance
     *
     * @return string
     */
    static function toSubprocessGlobals(Request $request)
    {
        $globalz = str_replace("'", "\\'", serialize(InjectRequestGlobals::fromRequest($request)));
        return <<<EOF
call_user_func(function () { foreach (unserialize('{$globalz}') as \$key => \$value) { \$GLOBALS[\$key] = \$value; } });
EOF;
    }