if ( $_ !~ m/$i/ ) { print; }