NAME
Text::Wrap::Smart - Wrap text into chunks of (mostly) equal length
SYNOPSIS
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);
DESCRIPTION
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.
FUNCTIONS
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.
SEE ALSO
AUTHOR
Steven Schubiger <schubiger@cpan.org>
LICENSE
This program is free software; you may redistribute it and/or modify it under the same terms as Perl itself.