scheme - 从 Scheme 中的列表中删除一个字符

Question

例如

我有一个文件testing.txt，内容为

read 3 4

考虑

(define file(open-input file "testing.txt"))

我想删除rinread而不是整个单词，我想在没有第一个字符的情况下更新文件r，我知道我不能使用它，cdr file因为它会删除单词read。

有什么建议么？

Answer 1

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

(define lines (file->lines "testing.txt"))

此过程会将输入写入text给定的文件path，覆盖文件的内容：

(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操作由返回的列表file->lines，并使用write-to-a-file. 现在，您拥有自己解决问题所需的一切。