awk怎样得到某位置之前的最后一个字符的位置

jupiters

a="aaa ccc bbb@aaa.ccc"

用index(a,"@"可以找到@的位置，但是如何找到@之前最后一个空格" "的位置?

谢谢！:wink:

寂寞烈火

try1try, use match:
awk 'BEGIN{a="aaa bbb ccc@ddd.eee";print match(a,/ ([a-z])+@/)}'

shitou9000

1. awk '{
   
2. i=index($0,"@")
   
3. j=1
   
4. string=$0
   
5. while (j<i||j==0){
   
6. string=substr(string,j)
   
7. print string;i-=j
   
8. j=index(string," ")+1
   
9. if(j>1)max+=(j-1)
   
10. }
    
11. if(max) print max
    
12.     else print 0
    
13. }' yourfile

复制代码

还是烈火猛。

[ 本帖最后由 shitou9000 于 2007-7-19 00:56 编辑 ]

ivhb

原帖由 寂寞烈火 于 2007-7-19 00:19 发表
try1try, use match:
awk 'BEGIN{a="aaa bbb ccc@ddd.eee";print match(a,/ ([a-z])+@/)}'

"aaa bbb ccc               @ddd.eee";  ?

ivhb

1. 
   
2. awk -F"@" '{for (i=length($1); i>0 && substr($1,i,1)!=" "; --i); print i}'
   

复制代码

[ 本帖最后由 ivhb 于 2007-7-19 09:35 编辑 ]

sunceenjoy

echo aaa ccc bbb@aaa.ccc|awk '{c=match($0,/[^ ]*@.*/)-1;print c}'