从Scheme中的列表中删除字符

从Scheme中的列表中删除字符,scheme,racket,Scheme,Racket,比如说 我有一个文件testing.txt,上面写着 read 3 4 考虑 (define file(open-input file "testing.txt")) 我想删除read中的r而不是整个单词,我想更新没有第一个字符的文件r,我知道我不能使用cdr文件,因为它会删除单词read 有什么建议吗?给你的家庭作业一些提示。这将返回一个列表,文件的每一行都作为列表中的字符串: (define lines (file->lines "testing.txt")) 此过程将在给定的路

比如说

我有一个文件
testing.txt
,上面写着

read 3 4
考虑

(define file(open-input file "testing.txt"))
我想删除
read
中的
r
而不是整个单词,我想更新没有第一个字符的文件
r
,我知道我不能使用
cdr文件
,因为它会删除单词
read


有什么建议吗?

给你的家庭作业一些提示。这将返回一个列表,文件的每一行都作为列表中的字符串:

(define lines (file->lines "testing.txt"))
此过程将在给定的
路径
中向文件写入输入
文本
,覆盖文件内容:

(define (write-to-a-file path txt)
  (call-with-output-file path
    (lambda (output-port)
      (display txt output-port))
    #:exists 'replace))
您可以使用过程
string->list
list->string
(请参阅),
car
cdr
来操作
文件->行
返回的列表,并使用
写入文件
写入结果文本。现在你有了自己解决问题所需要的一切