perl -pi -e 's/^(.{17})(.{6})(.{31})(.{3})(.{3})/$1\t$2\t$3\t$4\t$5\t/' file.txt