$ perl -CSD -pe's/(.{0,60})\b/$1\n/g' FILE

##</code><code>##

$ perl -CSD -pe's/(\X{0,60})\b{wb}/$1\n/g' FILE