my @array = (split(/[\t\s\\]/,$line))[0..($columns-1)];
   $array[-1] /= 1024;