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