Text::Wrap::Smart - Wrap text into chunks of (mostly) equal length
use Text::Wrap::Smart qw(wrap_smart); $text = "..."; # random length # example options %options = ( no_split => 1, max_msg_size => 160, ); @chunks = wrap_smart($text, \%options);
Text::Wrap::Smart was primarly developed to split an overly long SMS message into chunks of mostly equal size. The distribution's wrap_smart() may nevertheless be suitable for other purposes.
Text::Wrap::Smart
wrap_smart()
@chunks = wrap_smart($text [, { options } ]);
options may contain the no_split option indicating that words shall not be broken up which indicates 'fuzzy wrapping` (if no_split is undefined, 'exact wrapping` will be applied). max_msg_size sets the character length boundary for each chunk emitted.
options
no_split
max_msg_size
Text::Wrap
Steven Schubiger <schubiger@cpan.org>
This program is free software; you may redistribute it and/or modify it under the same terms as Perl itself.
See http://www.perl.com/perl/misc/Artistic.html
To install Text::Wrap::Smart, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Text::Wrap::Smart
CPAN shell
perl -MCPAN -e shell install Text::Wrap::Smart
For more information on module installation, please visit the detailed CPAN module installation guide.