perl 正则表达式中如何产生回车

hwlyic

$string = "a, b, c, d";
希望能够变成 $string = "a\nb\nc\nd";
打印时变成
a
b
c
d

所以我用正则表达式：$string =~ s/,/\n/g;

但是没有效果，请大拿们帮忙看看

Monox

回复 1# hwlyic

1. 
   
2. $ cat test.pl
   
3. $string = "a, b, c, d";
   
4. 
   
5. $string =~ s/, /\n/g;
   
6. 
   
7. print $string;
   
8. $ perl test.pl
   
9. a
   
10. b
    
11. c
    
12. d$

复制代码

mcshell

1. $string =~ s/,\s*/\n/g;

复制代码

pitonas

这个必须赞一个{:2_179:}
回复 3# mcshell


   

fkiori

$string =~ s/,/\n/sg;