I'm having a tough time finding a module (or code)
which would turn a HTML table into text (wrapping and all).
Or a module which would neatly format/wrap an AoAoA something like this:
my @Table = (
[
["0123456","bar","0" ],
["Let's talk about these excellent numbers"],
["Bah bar" ],
[ '0123456' ]
]
);
use Text::WrapAoAoA;
print
wrapit( {
colsep => ' ',
colwrap => [ 4, 10],
asonetable => 1,
},@Table);
print
wrapit( {
colsep => ' ',
colwrap => [ 4, 10],
asonetable => 0,
},@Table);
__END__
# results if wrapping for 1st column was 4
# and for 2nd column was 10
# with a separation between them of 1 space
0123- Let's talk
456 about these
bar excellent
0 numbers
Bah bar
0123456
# or even this, given the option
0123- Let's talk
456 about these
excellent
numbers
bar Bah bar
0 0123456
Now I could write something, and probably will eventually, but i'm really dying for a canned solution (this isn't on my to-do list yet, and i'd rather it don't end up there).
update: removed a stray }
MJD says you
can't just make shit up and expect the computer to know what you mean, retardo!
** The Third rule of perl club is a statement of fact: pod is sexy.
|