请教高手：grep 用法

rabble_1

如果有一行字符串$line = '我的email是23895789@qq.com,请联系我'，如何把其中的邮件地址打印出来，打印的格式是：
23895789@qq.com 23895789
即：username@xx.com username 的格式
需要注意的是，字符串里面可能有很多email，需要全部打印出来，就是说要匹配邮件地址，然后打印出来，不知道我说清楚了没，真心请教大侠，结草衔环，感激不尽！

jason680

回复 1# rabble_1

# grep can't do that
$ echo '我的email是23895789@qq.com,请联系我' | grep -oP "(?<=是)[^,]+(?=,)"
23895789@qq.com

$ echo '我的email是23895789@qq.com,请联系我' | awk -F"[是,@]" '{print $2"@"$3,$2}'
'
23895789@qq.com 23895789
   

yinyuemi

1. echo $line
   
2. 我的email是23895789@qq.com,23895789@qq.com,23895789@qq.com,请联系我
   
3. 
   
4. perl -lne '/([\w]+)@[\w.]+(*SKIP)(?{print "$& $1 "})(*FAIL)/' <<<$line
   
5. 23895789@qq.com 23895789
   
6. 23895789@qq.com 23895789
   
7. 23895789@qq.com 23895789
   

复制代码

xiaopan3322

1. echo $line | sed -rn 's/[^0-9]*([0-9]+)(@[^,]*),.*/\1\2 \1/p'

复制代码

fuliangcheng

第一种方法：awk -F"是" '{p=$2}{print p}'  file | awk -F"," '{q=$0}{print q}' $p | awk -F"," '{q=$1}{print $1}' | awk -F"@" '{print $q","$1}'
第二种方法：awk '{p=substr($1,15,15)}{q=substr($1,15,}{print p","q}' file



cat file
我的email是23895789@qq.com,请联系我
我的email是23895789@qq.com,请联系我
我的email是23895789@qq.com,请联系我
我的email是23895789@qq.com,请联系我

result：

23895789@qq.com,23895789
23895789@qq.com,23895789
23895789@qq.com,23895789
23895789@qq.com,23895789

winway1988

1. echo "$line" | sed -r 'G;G;:a;s/([0-9]+)(@[a-z.]+)([^\n]*\n\n)/\3\n\1\2 \1/;ta;s/^[^\n]*\n*//;'

复制代码

1. echo "$line" | awk -vRS="[0-9]+@[a-z.]+" 'RT{split(RT,a,"@");print RT,a[1]}'

复制代码

mcshell

1. [root@234267 mcshell]# perl -lne 'if(/(([a-zA-Z0-9._%+-]+)@\S+?(?=[,]))/){print "$1\t$2"}' tmp
   
2. 23895789@qq.com 23895789
   
3. 23895789@vip.sina.com   23895789
   
4. abc@qq.com      abc
   
5. [root@234267 mcshell]# cat tmp
   
6. 我的email是23895789@qq.com,请联系我'
   
7. 我的email是23895789@vip.sina.com,请联系我'
   
8. 我的email是abc@qq.com,请联系我'
   

复制代码