in reply to How to split a document at a column
perl -i.bak -ple 'substr($_, 25, 0, " ") if length > 24' filename.txt [download]