my $re = qr/(?:[^ab][^h])|(?:[^ab][h])|(?:[ab][^h])/; #### $string !~ /[ab]h/;