从 Erlang 读取字符输入,无需在提示符下按 Return 键

qua*_*ato 2 io erlang stdin

我正在查看io模块http://erlang.org/doc/man/io.html#read-1

并发现读取输入使用提示并等待用户按 Enter(返回?)。

如何一次读取 1 个字符而不需要按 Enter 键?

编辑

我努力了

io:setopts([{binary, true}]) 但这并没有改变它。

ŹV *_*V - 7

把自己绑在量子土豆上,你即将进入一个你从未知道存在的痛苦世界。


一位负责任的程序员会告诉你,没有办法做到这一点,当然不是可移植的。

现在, “不可移植”这个词已经被迂腐的狂热梦想所淡化,就像CHAR_BIT != 8巧妙地说服每个人“不可移植”意味着“60年代末建立的某些迷惑LSD的系统无法运行这个”“不会运行”在 Windows 上”

不,您将要遇到的是导致我们的祖先自愿使用自动工具的可移植性问题。真的,真的,不能跨不同的系统移植,甚至是“兼容 POSIX”的系统。

正如您可能想象的那样,执行此操作的明智方法是依赖 Ncurses 之类的东西,但正如生活中的许多必需品一样,Erlang 不存在非 NIF 实现。

尽管我刚刚向您发出了所有这些警告,但以下是我过去在紧要关头所做的事情:

-module(thing).
-compile(export_all).

get_char() ->
    Ch = io:get_chars("p: ", 1),
    io:fwrite("Ch: ~w", [Ch]).

start() ->
    io:setopts([{binary, true}]),
    get_char().
Run Code Online (Sandbox Code Playgroud)

独自一人,这当然行不通。因此,您需要从另一个设置适当 termios 输入标志的脚本调用您的脚本。正如我之前提到的,这在过去确实是一次真正的冒险,我没有听到任何让我相信情况已经改变的消息。

#!/bin/sh
stty --f /dev/tty icanon raw
erl -pa ./ -run thing start -run init stop -noshell
stty echo echok icanon -raw
Run Code Online (Sandbox Code Playgroud)

可以从 Erlang 程序中调用“stty”或发送魔术字符,但是如果没记错的话,您需要调用erlwith-noshell并添加其他stty咒语,例如timeecho 0

我过去遇到的另一个问题是,虽然你可以get_chars安全地使用,但其他io功能会失败,因为其中一些功能有自己的内置“在线烹饪”。

如果所有这些还没有让您相信计算机对人类来说是一场灾难,您可以在优秀的《Linux 编程接口》一书中阅读更多有关此内容的详细信息。

祝你好运。