string - 根据perl中的输出屏幕调整行大小

Question

我在 perl 的屏幕上输出一些文本

但是，我想确保只有 1 行适合每个屏幕行，因此如果我更改屏幕，程序会自动调整其输出行大小。

有没有办法在没有用户交互的情况下自动完成？

谢谢

score 1 · Accepted Answer

perl -MTerm::ReadKey -E '($cols,$rows) = GetTerminalSize(); say "This screen has $rows rows and $cols columns."'

score 1 · Accepted Answer

在 Unix/Linux 上，您应该能够使用 Term 系列模块来获取当前屏幕尺寸。您甚至可以将 SIGWINCH 与它挂钩，并通过调整输出来响应终端窗口调整大小事件。

2 回答 2