hi, ich möchte Modul Text:: Wrap.
Dieses Modul bietet die Möglichkeit, $ Text:: Wrap:: tabstop zur Änderung der tabstop von 8 Leerzeichen für jede Nummer.
Ich möchte, um sie bis zum 30. Leerzeichen. aber wenn ich die nummer von Rohlingen passiert nichts.

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

Was ist in $ 1? Die Dokumentation wird vorgeschlagen, sie sollten eine Reihe von Textzeilen. (Sie wissen, daß $ 1 wird der String durch die erste Reihe von Klammern der neuesten regex Spiel?)

sicher, ob ich wissen, was in $ 1. nach einigen Stunden habe ich herausgefunden, dass die Funktion $ Text:: Wrap: tabstop nicht einverstanden mit dem, was ich tought, aber ich weiß nicht, was sie wirklich das macht, von jetzt an.

, Wenn der Text hat führende Leerzeichen ersetzt es läuft von n Räume mit einem Tabulator-Zeichen. Normalerweise n sollte 8, wie das ist die festverdrahtete Registerkarte Breite der meisten Terminals, aber Sie können es zu etwas anderem, wenn Sie benötigen. (Ich vermute, Sie das nicht tun, wenn.)

Der erste Parameter zu Wrap sagt, wie zum Einrücken der ersten Zeile, und der zweite Parameter, so wie Gedankenstrich folgenden Zeilen. Wenn Sie wollen, dass sie eingerückt von dreißig Räume, versuchen "" X 30 für den zweiten 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