$line .= split /[ \t]*/; # Notice '.=' operator