Beefy Boxes and Bandwidth Generously Provided by pair Networks
P is for Practical
 
PerlMonks  

Re^2: Understanding Split and Join

by Athanasius (Abbot)
on Jul 16, 2014 at 16:16 UTC ( #1093896=note: print w/ replies, xml ) Need Help??


in reply to Re: Understanding Split and Join
in thread Understanding Split and Join

Have you looked at the FAQ, How do I reformat a paragraph? The core module Text::Wrap may be all you need:

use strict; use warnings; use Text::Wrap qw($columns wrap); $columns = 80; print wrap('', '', <DATA>); __DATA__ The quick brown fox jumped over the lazy dog. The quick brown fox jump +ed over the lazy dog. The quick brown fox jumped over the lazy dog. T +he quick brown fox jumped over the lazy dog. The quick brown fox jump +ed over the lazy dog. The quick brown fox jumped over the lazy dog. T +he quick brown fox jumped over the lazy dog. The quick brown fox jump +ed over the lazy dog. The quick brown fox jumped over the lazy dog. T +he quick brown fox jumped over the lazy dog. The quick brown fox jump +ed over the lazy dog.

Output:

2:13 >perl 935_SoPW.pl The quick brown fox jumped over the lazy dog. The quick brown fox jump +ed over the lazy dog. The quick brown fox jumped over the lazy dog. The quick +brown fox jumped over the lazy dog. The quick brown fox jumped over the lazy dog +. The quick brown fox jumped over the lazy dog. The quick brown fox jumped o +ver the lazy dog. The quick brown fox jumped over the lazy dog. The quick brow +n fox jumped over the lazy dog. The quick brown fox jumped over the lazy dog +. The quick brown fox jumped over the lazy dog. 2:13 >

Hope that helps,

Athanasius <°(((><contra mundum Iustus alius egestas vitae, eros Piratica,


Comment on Re^2: Understanding Split and Join
Select or Download Code

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1093896]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others musing on the Monastery: (7)
As of 2015-07-04 22:45 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (60 votes), past polls