Hej, jeg vil bruge modulet Tekst:: Ombryd.
Dette modul giver mulighed $ Tekst:: Ombryd:: tabstop at ændre tabstop fra 8 blanktegn til enhver nummer.
Jeg ønsker at indstille det til 30 blanktegn. men når jeg ændre nummer af blanktegn sker der ingenting.

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

Hvad indeholder $ 1? Dokumentationen tyder det bør være en bred vifte af tekst linjer. (Du behøver vide, at $ 1 er den streng modsvares af det første sæt parenteser af de seneste regex match?)

sikker på, at jeg ved, hvad der er i $ 1. efter nogle timer, jeg fandt ud af, at funktionen $ Tekst:: Ombryd: tabstop er ikke enig med hvad jeg tought, men jeg ved ikke, hvad det virkelig betyder nu.

Når teksten er førende whitespace, den erstatter løber af n rum med en tabulatortegnet. Normalt n bør 8, som det er Hardwired fanen bredde mest terminaler, men du kan ændre den til noget andet, hvis du har brug for det. (Jeg formoder, du ikke, selv om.)

Den første parameter til indhyllingsafstand siger hvordan led, første linje, og den anden parameter, siger hvordan led efterfølgende linjer. Hvis du vil have dem indrykket af tredive rum, kan du prøve "" X 30 for det andet parameter.

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