如何在忽略部分文本的同时重定向

Question

一些潜在的重复可能如下：

如何忽略被重定向的特定行

但我不能由此推断来解决我的问题。所以，我在这里问你。

所以，我到目前为止得到的是：

sbcl --noinform --non-interactive --eval "(ql:quickload :lambda-calculus-compiler)" < test.lisp > x.txt

我试图计算一个lisp文件，读取一个文本文件test.lisp并使用它作为(ql:quickload :lambda-calculus-compiler的输入代码。当加载这个函数时，一个函数被调用读，它将读取test.lisp中的内容，然后这个评估将被重定向到x.txt。

以下是此操作之后x.txt的内容：

To load "lambda-calculus-compiler":
  Load 1 ASDF system:
    lambda-calculus-compiler
; Loading "lambda-calculus-compiler"
(((LAMBDA (N) (LAMBDA (M) (LAMBDA (F) (LAMBDA (Z) ((M F) ((N F) Z))))))
  (LAMBDA (F) (LAMBDA (Z) (F (F (F Z))))))
 (LAMBDA (F) (LAMBDA (Z) (F (F (F Z))))))

我想无视或摆脱

To load "lambda-calculus-compiler":
  Load 1 ASDF system:
    lambda-calculus-compiler
; Loading "lambda-calculus-compiler"

这是(ql:quickload :lambda-calculus-compiler)的输出。

任何帮助都将不胜感激。请不要把这个标记为副本。正如我所提到的，我不能从我上面提到的答案中推断出。

谢谢。

Answer 1

一种选择是在重定向到文件之前将命令通过sed管道传输：

sbcl --noinform --non-interactive --eval "(ql:quickload :lambda-calculus-compiler)" < test.lisp |
  sed '1,/Loading "lambda-calculus-compiler"/ d' > x.txt

这将删除以包含该短语的后面的1到1开头的行。

但我怀疑，正如我在评论中提到的，可能还有其他特定于sbcl的选项。