foreach $line (@file) {
($field1value, $field2value, $field3value, $field4value, $field5value, $field6value, $field7value, $field8value, $field9value, $field10value) = split(/\t+/, $line);