¿Cuántos espacios para una ficha sobre esta TTY

Question

Tengo un script en Perl que está escribiendo en la salida estándar, que es un TTY. ¿Hay una manera de determinar el número de espacios a una ficha en que TTY?

Answer 1

Usted quiere que el 'eso' capacidad de terminfo .

use Term::Terminfo;
my $ti = Term::Terminfo->new; 
$tabsize = $ti->getnum( "it" );