Text::Wrap - line wrapping to form simple paragraphs
use Text::Wrap print wrap($initial_tab, $subsequent_tab, @text); use Text::Wrap qw(wrap $columns); $columns = 132;
Text::Wrap::wrap() is a very simple paragraph formatter. It formats a single paragraph at a time by breaking lines at word boundries. Indentation is controlled for the first line ($initial_tab) and all subsquent lines ($subsequent_tab) independently. $Text::Wrap::columns should be set to the full width of your output device.
print wrap("\t","","This is a bit of text that forms a normal book-style paragraph");
It's not clear what the correct behavior should be when Wrap() is presented with a word that is longer than a line. The previous behavior was to die. Now the word is split at line-length.
David Muir Sharnoff <email@example.com> with help from Tim Pierce and others.