with t as(
select 'qwertz21uiop' pass from dual union all   --no
select 'q1#z'  from dual union all    --no
select 'qwerKziop'  from dual union all --no
select 'qwer!tGo3pm'  from dual  -- yes.
)
select * from t

with t as(
select 'qwertz21uiop' pass from dual union all   --no
select 'q1#z'  from dual union all    --no
select 'qwerKziop'  from dual union all --no
select 'qwer!tGo3pm'  from dual  -- yes.
)
select * from t
WHERE  REGEXP_LIKE(pass,'^[^0-9]+$|^[^a-zA-Z]+$|^[^-\$\\\#\@\!\?]{8,}$') ;

not (length(pass) in (1,2,3,4,5,6,7,
                      length(translate(pass, '*'||'0123456789', '*')),
                      length(translate(pass, '0'||'abcdefghijklmnopqrstuvwxyz', '0')),
                      length(translate(pass, '0'||'ABCDEFGHIJKLMNOPQRSTUVWXYZ', '0')),
                      length(translate(pass, '0'||'!"#$%&''()*+,-./:;<=>?@[\]^_`{|}~', '0'))
    )                )