在寻找k_word时，为了去打末尾的换行符，使用chomp;但
在windows下创建的的文件，读取一行，如一行为 weather 把它赋值为$str，然后print length($str)，得到8；chomp $str; print length($str) 得到7
同样在linux创建同样的文件，一样操作，结果也一样；
但问题，在linux下创建的文件，上传到linux下，一样操作，得到的是9，8；
可能是windows下的换行符是\r\n ；linux下是\n; 但window下的chomp $str 去掉的是\r\n,而linux下的chomp只是去掉\n
所有在lwindow下的文件移到linux是 去换行应 chomp $seq ; $seq=~s/\r//;