Pat*_*ick 6 perl keyboard-events
我有一个实用程序,我用作伪"shell".它基本上是while()的stdin for commands并通过不同的子程序运行它们.
我的问题是,是否有一个模块或一些例子我可以用来捕获向上箭头以便我可以让它执行某个动作？我打算合并一个类似于bash的前一个命令函数.
现在,如果我按向上箭头我得到这个:
patrick@utility$ ^[[A^[[A^[[A^[[A
提前致谢.