求助，关于perl验证字符串的正则的问题，具体如下面！

Question

比如我想验证一个字符串中是否带有"@163.com"
于是我就写成：
die 'no' unless $string =~/\@163.com/;
但是这样貌似并不能成功。我放其他的字符串都会提示匹配失败。
求助高手。。
呃，另外还有个问题，比如有一个字符串的规则是：多个email，每个email中间用英文逗号隔开。
email可以用/^\w+([-+.]\w+)*@\w+([-.]\w+)*\.\w+([-.]\w+)*$/来验证
那么对于可能存在的逗号该如何验证呢？