chomp; my @line = split /\s+/, $_;