hola, quiero utilizar el módulo de texto:: Recapitulación.
Este módulo ofrece la opción de $ Texto:: Envoltura:: tabstop para cambiar el tabstop a partir del 8 de espacios en blanco a cualquier nummer.
Quiero ponerlo a 30 espacios. pero cuando el cambio de nummer blanco no pasa nada.

Text::Wrap::tabstop = 30;
$wtd = wrap("","\t",$1);

¿Qué pasa en $ 1? La documentación indica que debe ser un conjunto de líneas de texto. (Usted sabe que $ 1 es la cadena acompañado por el primer conjunto de paréntesis de la última regex partido?)

i seguro de saber lo que está en $ 1. después de unas horas me enteré que la función $ Texto:: Envoltura: tabstop no está de acuerdo con lo tought i, i, pero también no sabe lo que realmente hace por ahora.

Cuando el texto ha líder blanco, que sustituye ejecuta de n espacios con un carácter de tabulación. Normalmente n debe ser 8, ya que es físicamente la ficha de ancho de la mayoría de los terminales, pero se puede cambiar a otra cosa si es necesario. (Sospecho que no, aunque.)

El primer parámetro de recapitulación dice cómo guión la primera línea, y el segundo parámetro indica la forma de las líneas guión. Si usted desea sangrado por treinta espacios, intenta "" X 30 para el segundo parámetro.

vnix$ perl -MText::Wrap -e 'print wrap(""," " x 30, <>)' /etc/motd | head -5
Linux indeed 2.6.24-17-generic #1 SMP Thu May 1 13:57:17 UTC 2008 x86_64
                              
                              The programs included with the Ubuntu system
                              are free software;
                              the exact distribution terms for each program