请教去掉换行符问题

三点鱼

内容有多行,想去掉换行符或者用" "(空格符)替换也可以.请求大家帮忙
我用过chop()和chomp().好象都没有起作用.

flw

1. use strict;
   
2. 
   
3. my $str = q~hello!
   
4. asldkfjsaljf
   
5. sdflsjdfljsdf
   
6. sflskdfj~;
   
7. 
   
8. print $str, "\n";
   
9. 
   
10. $str =~ s/\n/ /g;
    
11. 
    
12. print $str;
    

复制代码

superdoctor

chomp为什么会不起作用，楼主是怎么用的？

三点鱼

查了点资料,现在使用chomp()可以去掉换行符了.
只要添加一个
$/ = "\r\n";
就可以了.

另外我借鉴flw的方法,可是实现不了替换功能.请大家帮忙,有点急的~~谢谢

ranzo

win下的换行和unix下的不一样，一个多一个\n。

三点鱼

谢谢大家的帮忙,问题已经解决了
因为我把
$str =~ s/\r\n/ /g;
写成了
$str = ~ s/\r\n/ /g;
就因为多了一个空格,我郁闷了一天.希望大家以后也要多多注意.