求助

林间笑客

回复 10# 清泉一边


    哥们你 看看我七楼的回复，你这样的split 会将后面的也给切掉了，还有啊，本来之间有两个空格，结果又少了一个

清泉一边

你可以再加上一个空格的嘛~ 回复 11# 林间笑客


   

林间笑客

回复 12# 清泉一边


    关键是将ATOM   3693  C FRG            52.275 -42.368 -69.995                       C   1476524726           FRG 后面和这些数字后面的空格都删了

jason680

回复 7# 林间笑客

    s/^(ATOM\s+\d+)\s+(\D+)\d+\s+(FRG)/$1 $2 $3/;

   

cloudsurf

至于这么复杂么，可能我理解的不太准确，是要替换掉所有以字母打头的后面的数字吗？
试试s/(?<=[A-Z]+)\d+//g

林间笑客

回复 14# jason680


    哥们，学习了，这正则老是用不熟，能加下QQ 么？

林间笑客

回复 15# cloudsurf


    是替换
ATOM   3695  O81 FRG            52.246 -43.459 -69.422                       O   1476524726
ATOM   3696  N82 FRG            52.693 -39.445 -67.776                       N   1476524726
ATOM   3693  C81 FRG            52.275 -42.368 -69.995                       C   1476524726
ATOM   3694  N81 FRG            52.020 -42.256 -71.305                       N   1476524726
ATOM   3695  O81 FRG            52.246 -43.459 -69.422                       O   1476524726
ATOM   3696  N82 FRG            52.693 -39.445 -67.776                       N   1476524726
ATOM   3697  C83 FRG            52.622 -41.106 -69.278                       C   1476524726
ATOM   3698  N83 FRG            53.623 -39.254 -68.752                       N   1476524726
ATOM   3699  C84 FRG            52.077 -40.536 -68.051                       C   1476524726
ATOM   3700  C85 FRG            53.561 -40.268 -69.664                       C   1476524726
ATOM   3707  C1   FRG             48.712 -41.951 -75.402                       C   1666413310
ATOM   3708  C6   FRG             49.208 -42.806 -74.419                       C   1666413310
ATOM   3709  C7   FRG             49.322 -44.301 -74.331                       C   1666413310
ATOM   3710  O11 FRG            48.960 -45.073 -75.202                       O   1666413310
ATOM   3711  O8   FRG             49.868 -44.694 -73.173                       O   1666413310

看到081 N82 C81 ...这样的没有，主要是将这后面的数字删除了，有的后面是一位数字的，有的是两位数字的，删除后，这样的格式不变.....我再给它们这样的编号
ATOM   3695  O1  FRG            52.246 -43.459 -69.422                       O   1476524726
ATOM   3696  N1  FRG            52.693 -39.445 -67.776                       N   1476524726
ATOM   3693  C1  FRG            52.275 -42.368 -69.995                       C   1476524726
ATOM   3694  N2  FRG            52.020 -42.256 -71.305                       N   1476524726
ATOM   3695  O2  FRG            52.246 -43.459 -69.422                       O   1476524726
ATOM   3696  N3  FRG            52.693 -39.445 -67.776                       N   1476524726
ATOM   3697  C2  FRG            52.622 -41.106 -69.278                       C   1476524726
ATOM   3698  N4  FRG            53.623 -39.254 -68.752                       N   1476524726
ATOM   3699  C3  FRG            52.077 -40.536 -68.051                       C   1476524726
ATOM   3700  C4  FRG            53.561 -40.268 -69.664                       C   1476524726
ATOM   3707  C5  FRG            48.712 -41.951 -75.402                       C   1666413310
ATOM   3708  C6  FRG            49.208 -42.806 -74.419                       C   1666413310
ATOM   3709  C7  FRG            49.322 -44.301 -74.331                       C   1666413310
ATOM   3710  O3  FRG            48.960 -45.073 -75.202                       O   1666413310
ATOM   3711  O4  FRG            49.868 -44.694 -73.173                       O   1666413310

就是这样的

substr函数

这样吗？

1. my %number;
   
2. while (<DATA>) {
   
3.     s/([A-Z])\d+\s+/$1.++$number{$1}."\t"/e;
   
4.     print;
   
5. }
   
6. 
   
7. __DATA__
   
8. ATOM   3695  O81 FRG            52.246 -43.459 -69.422                       O   1476524726
   
9. ATOM   3696  N82 FRG            52.693 -39.445 -67.776                       N   1476524726
   
10. ATOM   3693  C81 FRG            52.275 -42.368 -69.995                       C   1476524726
    
11. ATOM   3694  N81 FRG            52.020 -42.256 -71.305                       N   1476524726
    
12. ATOM   3695  O81 FRG            52.246 -43.459 -69.422                       O   1476524726
    
13. ATOM   3696  N82 FRG            52.693 -39.445 -67.776                       N   1476524726
    
14. ATOM   3697  C83 FRG            52.622 -41.106 -69.278                       C   1476524726
    
15. ATOM   3698  N83 FRG            53.623 -39.254 -68.752                       N   1476524726
    
16. ATOM   3699  C84 FRG            52.077 -40.536 -68.051                       C   1476524726
    
17. ATOM   3700  C85 FRG            53.561 -40.268 -69.664                       C   1476524726
    
18. ATOM   3707  C1   FRG             48.712 -41.951 -75.402                       C   1666413310
    
19. ATOM   3708  C6   FRG             49.208 -42.806 -74.419                       C   1666413310
    
20. ATOM   3709  C7   FRG             49.322 -44.301 -74.331                       C   1666413310
    
21. ATOM   3710  O11 FRG            48.960 -45.073 -75.202                       O   1666413310
    
22. ATOM   3711  O8   FRG             49.868 -44.694 -73.173                       O   1666413310
    

复制代码