使用Perl,如何在STDIN不需要用户输入Enter的情况下捕获单个字符(类似于C的getch()功能)?
STDIN
getch()
Perl有一个getc()函数,但是根据perlfunc:
getc()
但是,它无法单独用于获取单个字符而无需等待用户按Enter键.
perlfunc文档确实提供了一种使用单个字符读取的方法,getc()但它需要使用操作终端设置stty.我正在编写的脚本需要在Windows上运行(没有cygwin,msys等) - 所以这不是一个选项.
stty
windows perl
perl ×1
windows ×1