如何在反向语句中使用正则表达式

Question

open IN, "in.txt";
open OUT, ">out.txt";

print OUT unless m[^foo] while <IN>;

为什么上面的代码没有编译？

Answer 1

问题是,允许您将if/ unless/ while作为后缀写入一行代码的符号只能在该行中使用一次.因此,您必须将代码中的最后一行替换为:

while (<IN>) {
    print OUT unless m[^foo];
}

这种情况的替代方案是使用or:

m[^foo] or print OUT while <IN>;