$line =~ s/\s\s/ /g;