@fi = split(/\s+/, $nextline);