file = "file_to_read.txt";
F=fopen(file,"r");
titles=fgetl(F);
titles=regexprep(titles,'\s+',' ');
titles=split(titles," ");
fields=cellstr(titles);

nfile=0;
while ( (line=fgetl(F)) != -1 )
 if (line == -1)
 	break
 endif
 nfile = nfile+1;
 temp=regexprep(line,'\s+',' ');
 temp=split(temp," ");
 temp=cellstr(temp);
 for i=1:size(fields)
 	cmd=sprintf("data(%d).%s=\"%s\";",nfile,fields(i),temp(i));
%	disp(cmd)
	eval(cmd);
 endfor
endwhile
fclose(F);