use Regexp::Common 'do_not_match';

my $re = $RE{do_not}{-match => 'something'}