cat text | perl -ne 'chomp ;
              foreach $i(0..length($_)%7) {$x[$i]=substr($_,$i*8,8)};
              foreach $i(0..length($_)%7) {print "\$array[$i]",$x[$i],"<\n"}'

##</code><code>##

GRID     213736         15235.2 -2606.28596.178

##</code><code>##

$array[0]GRID    <
$array[1] 213736 <
$array[2]        <
$array[3]15235.2 <
$array[4]-2606.28<
$array[5]596.178<