my @data = split/\s+/,$line;
表示用1个或多个空【包括空格，Tab……】分割$line，分割后的内容放入数组data
由于文件每一“列”指的也是用空格、Tab分开的字段
打印data[0] 就是输出第一个字段（第一列）。data[1]就是第二个字段（第二列）……
