一个模式匹配的问题蹩脚问题，请各位一定帮忙！

#!/usr/local/bin/perl
$abc[1]='#15:community\@@61.148.38.116';
$abc[2]='Title[E.test]: 对链路--E.test的分析';
$abc[3]='PageTop[E.test]: 对链路--E.test的分析,最大流量为1222222字节/秒';
$abc[4]='Target[E.test]: 15:community\@@61.148.38.116:::::2';
$abc[5]='MaxBytes[E.test]: 1222222';
$a='#15:community\@@61.148.38.116';
print "$a\n";
if (grep(/$a/,@abc))
  {
    print "It's OK\n";
}

不明白为什么就匹配不到，是因为里面有特殊字符？那怎么样才能让它正常匹配呢？急疯了。。。，先谢谢各位了！

按变量$a的字面意义来匹配用/\Q$a\E/