>perl -wMstrict -le
"my $s = 'GRID     213736         15235.2 -2606.28596.178';
 my @ra = $s =~ m{ .{1,8} }xmsg;
 print qq{:$_:} for @ra;
"
:GRID    :
: 213736 :
:        :
:15235.2 :
:-2606.28:
:596.178: