print $_ unless $_ =~ /$pattern/;