> perl -lne 'my $l = 80; s/(.{$l})\b/$1\n/g;print'
Я хочу автоподбор оптимального $l
--
Moscow.pm mailing list
[email protected] | http://moscow.pm.org

Ответить