my @field_names = split (' ', $lines[0]); # split 1st line