in reply to
regexp word break help
Does it have to be a regexp? Why?
use Text::Wrap qw(wrap $columns);
$columns = 45;
my @lines = wrap('', '', 'Make sure this string is 45 chars or less, a
+nd if you have to truncate it to make it shorter, only break it betwe
+en a word (\s)');
0 - I'm a blankster
0 - My devices have no keyboard
0 - I use a chorded keyboard that transcends your concept of keys
26 - I need the other keys for Perl sigils!
31 - I write code in the original APL
31 - ß counts only as one letter!
∞ - I use an Optimus keyboard
ℵ1 - I reject your Latin-centric notion of letters
Results (8 votes),