foreach my $line (@lines){
  @lineFields = split( ' ', $line );
}