![]() |
Hej och välkommen från USA till UNIX och Linux Forum! Tack för ditt besök och gå med i vår globala gemenskapen.
|
|
google unix.com
|
|||||||
| Forum | Registrera | Forum Regler | Länkar | Album | FAQ | Medlemslista | Kalender | Söka | Dagens inlägg | Markera forum som lästa |
| Shell-programmering och Skript Post frågor om ksh, CSH, SH, bash, PERL, PHP, sed, awk och andra skalskript och skal skriptspråk här. |
Mer UNIX och Linux Forum Ämnen Du kan hitta Helpful
|
||||
| Tråd | Thread Starter | Forum | Svar | Senaste Inlägg |
| Radbryt frågan med grep | bowtiextreme | HP-UX | 4 | 04-30-2008 08:39 |
| SCO förvärv wrap-up | iBot | UNIX och Linux RSS Nyheter | 0 | 02-19-2008 05:30 |
| Wrap Interactive Script | meskue | Shell-programmering och Skript | 0 | 06-23-2006 07:21 |
| Ska jag använda sed / grep / awk för wrap fil? | vanda_25 | Shell-programmering och Skript | 6 | 05-04-2006 01:59 |
| Radbryt i vi | dangral | UNIX for Dummies Frågor & Svar | 3 | 10-30-2002 02:45 |
![]() |
|
|
LinkBack | Thread Tools | Sök i denna tråd | Rate Thread | Visningslägen |
|
|
|
||||
|
användning av modulen Text:: Wrap;
Hej, jag vill använda modulen Text:: Wrap.
Denna modul ger möjlighet $ Text:: Wrap:: tabstop att ändra tabstop från 8 blanks till varje nummer. Jag vill ställa den till 30 blanksteg. men när jag byta nummer av blanks händer ingenting. Kod:
Text::Wrap::tabstop = 30;
$wtd = wrap("","\t",$1);
thx |
|
||||
|
Vad är på $ 1? Den dokumentation som tyder på att det bör finnas ett utbud av textrader. (Du vet att $ 1 strängen motsvaras av den första uppsättningen parentes i den senaste regex match?)
|
|
||||
|
När texten har ledande whitespace, det ersätter körs av n utrymmen med en tabbtecken. Normalt n bör 8, som är Hardwired fliken bredd på de flesta depåer, men du kan ändra den till något annat om du behöver. (Jag misstänker att du inte, dock.)
Den första parametern till wrap säger hur strecksatsen första raden och den andra parametern säger hur strecksatsen efterföljande rader. Om du vill ha dem indragen med trettio platser, försök "" X 30 för den andra parametern. Kod:
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
Senast redigerad av era; 06-05-2008 vid 03:11.. Anledning: Lägg till exempel produktion |
![]() |
| Komihåglista |
| Taggar |
| linux, ubuntu |
| Thread Tools | Sök i denna tråd |
| Visningslägen | Betygsätt denna tråd |
|
|