【小技巧】从text文件里面提取邮箱地址

   1: perl -wne'while(/[\w-\.]+@[\w-\.]+\w+/g){print "$&\n"}' jira.email.txt