删除长的数字串(>5)，正则表达式怎么表示

hxletter

假设数据

1,e,r,15255256,e,r,4
s,d,16166616,r,g,7,8

我想把15255256和16166616删掉,怎么弄

1,e,r,e,r,4
s,d,r,g,7,8

dn833

1. sed -r 's/[^,]{5,},?//g'

复制代码

hxletter

回复 2# dn833


    thanks

Fock3r

大神求解释一下代码.......回复 2# dn833


   

这个冬天不冷

1. [root@localhost ~]# awk -F, -vOFS="," '{for(i=1;i<NF;i++)if(length($i)<5)printf("%s,",$i)}{if(length($NF)<5)print $NF}' file1
   
2. 1,e,r,e,r,4
   
3. s,d,r,g,7,8
   
4. [root@localhost ~]# cat file1
   
5. 1,e,r,15255256,e,r,4
   
6. s,d,16166616,r,g,7,8
   
7. [root@localhost ~]#
   

复制代码

dn833

回复 4# Fock3r


    把连续5个或5个以上非逗号并且后边紧跟着0个或者1个逗号的字符串统统干掉

Fock3r

3Q,明白了。回复 6# dn833


   

reb00t

php练习～～{:2_172:}

1. $fp = file_get_contents('200.txt');
   
2. $newarr = array();
   
3. foreach (explode(',' , $fp) as $k => $v) {
   
4.          if(strlen($v)<5){
   
5.       $newarr[]=$v;
   
6.          }
   
7. }
   
8. echo implode(',', $newarr);
   
9. ?>
   
10. 
    
11. 结果：
    
12. 
    
13. 1,e,r,e,r,4
    
14. s,d,r,g,7,8
    
15. [Finished in 0.2s]

复制代码

reyleon

1. awk -F, '{for(i=0;i++<NF;)if(length($i)<5)s=length(s)?s","$i:$i;print s;s=""}'  

复制代码

李满满

学生党:飘过~
[yhsafe@shell ~]$ awk 'BEGIN{FS=",";OFS=","}{for(n=1;n<=NF;n++){$n=(length($n)>5)?"":$n}}1' file.txt |tr -s ","
1,e,r,e,r,4
s,d,r,g,7,8