if ( $bar !~ /bar/ and ( $baz =~ /qux/ or not defined $undef ) )