http://www.perlmonks.org?node_id=1029007


in reply to Adding a TAB after a certain ammount of characters

xkcd://208: Regular Expressions to the rescue.
perl -pi -e 's/^(.{17})(.{6})(.{31})(.{3})(.{3})/$1\t$2\t$3\t$4\t$5\t/ +' file.txt

#11929 First ask yourself `How would I do this without a computer?' Then have the computer do it the same way.