原帖由 Perl_Er 于 2009-10-15 16:01 发表 !~ /second=[0|1]$/
原帖由 Perl_Er 于 2009-10-15 16:44 发表 为什么要匹配,不匹配也可以啊. 逆过来想一下 #!/usr/bin/perl -w use strict; use Data:umper; while () { if(! /\s*second=[0|1]\s+/){ print $_; } } __DATA__ .... sec ...