Ширина терминала

use Term::ReadKey;

($width, $height) = GetTerminalSize();

А tcgetattr там нет?

> А tcgetattr там нет?

И чем оно поможет при определении ширины терминала?

nobody:

Наверное, ничем. Когда писал, мне почудилось, что tcgetattr и размеры окна возвращает(все же такие же параметры терминала, как и флажки input/output). :) В общем-то, в Linux они реализуется через ioctl к терминальному драйверу и драйверу дисциплины линии (TIOCGWINSZ и TCGETS).

Ну это понятно. Только IMHO, из скрипта проще запустить команду

stty size | cut -d ' ' -f 2

nobody:

Если заточка под конкретный дистрибутив или версию stty, то - вполне. Я бы для себя так и сделал, чтобы не геморроиться зазря. :)