$line =~ s/[^\S\n]+//g;