$ perl -e '$_=<>;s/(.{75}.+?\s)/$1<br>/gs;print$/x3;print$_,$/x3'