stream - 写入后读取 *standard-input* Common Lisp

Question

这是一个非常简单的问题。我正在尝试解决 HackerRank 问题，但不完全理解如何写入 *standard-input* 以便在我的计算机上运行代码。

它要求在给定数组长度 (N) 后跟数组本身的情况下对数组求和，所有这些都在 *standard-input* 上。

Hackerranks 使用 *standard-input* 来提供值，如果我可以将值存储在输入中然后读取它们，那将是最简单的。

我的问题是如何写入*标准输入*？这将使在我的计算机上而不是在云中工作变得容易得多。

Answer 1

使用with-input-from-string .

(with-input-from-string (s "4 3 2")
  (let ((a (read s))
        (b (read s))
        (c (read s)))
    (format t "~a, ~a, ~a~%" a b c))) 

您也可以只从文件中读取，但是从字符串中读取对于制作不同的测试用例来说要容易得多。