匹配"//"

匹配"//"

匹配"//"
我用如下代码: if($_ =~ /\/\//){
#print $_;
}else{
print WFILE $_;
}
想匹配以双斜杠(//)开头的行,结果不成功,所有行都被匹配到了,大家帮忙看看啥原因
问题解决拉,似乎是文件格.
问题解决拉,似乎是文件格式问题
while (<>) {-- .
while (<>) {
print if m#^//#;
}