zjzc01:/root/test# cat a2.pl
$a="1 a 2 3 ";
if ($a =~/(a|b)/){print "1111111\n"};
zjzc01:/root/test# perl a2.pl
1111111
zjzc01:/root/test# cat a2.pl
$a="1 b 2 3 ";
if ($a =~/(a|b)/){print "1111111\n"};
zjzc01:/root/test# perl a2.pl
1111111
zjzc01:/root/test# cat a2.pl
$a="1 c 2 3 ";
if ($a =~/(a|b)/){print "1111111\n"};
zjzc01:/root/test# perl a2.pl
zjzc01:/root/test# 本文章为转载内容，我们尊重原作者对文章享有的著作权。如有内容错误或侵权问题，欢迎原作者联系我们进行内容更正或删除文章。
