请问一下为什么这里不匹配呢

请教一下为什么这里不匹配呢
perl代码

$_="aa/\\";
$rule="/[\\*/]";

if (m/$rule/) {
print "yes";
}
else
{
print "no";
};

我用 aa/\ 去 匹配 /开头,后面是\,*,/中的任一个,怎么不匹配呢? 

$rule="/[\\*/]";修改为$rule="/[\\\*/]"也一样, "/[\\*/]"和"/[\\\*/]"在这里应该是等效的.

[解决办法]

Perl code

my $rule='/[\\\\a]';