捕获，使用perl Term :: Screen模块或转义序列从终端获取行

Question

我使用Term :: Screen将字符串放入xterm。

$scr->at(2,0)->puts("this is some stuff");

但是我想捕获，得到第二行（偏移0直到eol），类似的东西：

$scr->at(2,0)->gets();

或者转义序列如何做到这一点？

感谢您的帮助！