$ perl community/wrap.pl 
Haaaaaaaa
<br>aaaaa
<br>aaaaa
<br>aaaaa
<br>aaaaa
<br>aaaaa
<br>aaaaa
<br>aalo
<br>Wie
<br>geht
<br>es
<br>dir
<br>heute
<br>so ?
$