while <FILE> {
 chomp;
 @line = split("\t");

 ... do things to @line...

}