If you find a way to decide what line length you want, here's a simple way to wrap it:

$ perl -e'my ($length, $string) = (42,"spdf" x 50); print substr($stri
+ng, 0, $length, ""), $/ while $string;'
spdfspdfspdfspdfspdfspdfspdfspdfspdfspdfsp
dfspdfspdfspdfspdfspdfspdfspdfspdfspdfspdf
spdfspdfspdfspdfspdfspdfspdfspdfspdfspdfsp
dfspdfspdfspdfspdfspdfspdfspdfspdfspdfspdf
spdfspdfspdfspdfspdfspdfspdfspdf
$
[download]

For HTML, of course, you would replace $/ with '<br />'.