Are these acceptably comparable?

They don't use a single bit of syntax, of course, but it's not clear to me from your question if you're seeking syntax or simply an method to exclude characters.

perl -e "use 5.012; my $foo='now is the time for'; if ( $foo =~ /[meit
+]+/ && $foo =~ /[^a]{1,20}/ ) { say 'true';} else {say 'nope';}"
true
[download]

Similarly, not a single phrase, but...

perl -e "use 5.012; my $bar = 'abcdefg'; if ($bar =~ /[a-d]/ && $ bar 
+!~ /[ef]/ ){ say 'true';} else {say 'false';}"
false
[download]