如何去掉重复的行

nanshanjin

比如：
ab
bc
ab
cd
把ab这两个重复的行去掉
结果是：
bc
cd

moperyblue

1. echo 'ab
   
2. bc
   
3. ab
   
4. cd'|sort|uniq -u

复制代码

sunzhiguolu

1. perl -e "$_=join(qq(\n),qw/ab bc ab cd/, q());0 while(s/(\N+\n)(.*?)^\1/$2/msg);print"

复制代码

q1208c

回复 4# ma3501406

分别的实现 ？

不会是学生的作业吧？

sunzhiguolu

回复 4# ma3501406

1. #!/usr/bin/perl
   
2. use strict;
   
3. use warnings;
   
4. 
   
5. local $_ =<<__END__;
   
6. sdfsdfxxx
   
7. sdfsdcccc
   
8. sfv
   
9. vb
   
10. cb
    
11. zxc
    
12. cvbn
    
13. __END__
    
14. 
    
15. local $/ = undef;
    
16. s/^(?:([a-z]{2,5})\N*\n)(?:\1\N*\n)+//gm;
    
17. print;
    

复制代码

mwl940602

uniq  -u

rubyish

回复 6# sunzhiguolu

s/^(?[a-z]{2,5})\N*\n)(?:\1\N*\n)+//gm;

youyisi ~~
3Q ~~

104359176

把正则玩到如此地步，基本上可以不用学加密了。

rubyish

回复 6# sunzhiguolu

if DATA? Ruhe xiugai? 3Q~

1. delA
   
2. keep
   
3. delB

复制代码