怎样正则匹配这三个符号：！|（）

怎样匹配感叹号！，竖线|，和小括号（）啊？试了好久，都不行。

回复 nb509


    [jesse@office ~]$ cat abc
abc!
abc
abc|
abc
abc()
over
[jesse@office ~]$ /usr/bin/perl -lne "print if m/(\!|\||[()])/" abc
abc!
abc|
abc()