Hi all,
I'm trying to format the output of lsmod for inclusion in a phpBB forum so that the lines get wrapped nicely at a certain length and you don't have to scroll horizontally forever to hit the reply button. And I'd like to do the same with the apache error log.
Starting with the output of lsmod I tried different approaches garnered on the net none of which produced the expected result.
Something I tried:
#!/usr/bin/perl
use Text::Wrap;
$Text::Wrap::columns = 100;
@modules = `lsmod`;
print Text::Wrap::fill( '', '', @modules );
It produces this output:
ip_tables 9688 3 iptable_mangle,iptable_nat,iptable_filter
x_tables 8964 17
xt_CONNMARK,xt_length,xt_tcpudp,ipt_dscp,ipt_ipp2p,xt_connmark,ipt_mul
+tiport,xt_state,ipt_TOS,xt_CL
ASSIFY,ipt_ACCOUNT,ipt_MASQUERADE,ipt_REDIRECT,ipt_REJECT,ipt_LOG,ipta
+ble_nat,ip_tables
sch_htb 14464 0
sch_sfq 4992 0
ppp_async 8192 0
crc_ccitt 2048 1 ppp_async
ppp_synctty 6912 0
ppp_generic 21140 2 ppp_async,ppp_synctty
It's the closest I've come to my goal but you see there are extraneous carriage returns as compared to the lsmod output:
ip_tables 9688 3 iptable_mangle,iptable_nat,iptable_fil
+ter
x_tables 8964 17 xt_CONNMARK,xt_length,xt_tcpudp,ipt_d
+scp,ipt_ipp2p,xt_connmark,ipt_multiport,xt_state,ipt_TOS,xt_CLASSIFY,
+ipt_ACCOUNT,ipt_MASQUERADE,ipt_REDIRECT,ipt_REJECT,ipt_LOG,iptable_na
+t,ip_tables
sch_htb 14464 0
sch_sfq 4992 0
ppp_async 8192 0
crc_ccitt 2048 1 ppp_async
ppp_synctty 6912 0
ppp_generic 21140 2 ppp_async,ppp_synctty
And also you lose the original formatting by neat columns. Is there a solution to my problem ?
TIA
Cheers, Pascal
Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
Read Where should I post X? if you're not absolutely sure you're posting in the right place.
Please read these before you post! —
Posts may use any of the Perl Monks Approved HTML tags:
- a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
| |
For: |
|
Use: |
| & | | & |
| < | | < |
| > | | > |
| [ | | [ |
| ] | | ] |
Link using PerlMonks shortcuts! What shortcuts can I use for linking?
See Writeup Formatting Tips and other pages linked from there for more info.