next if $pass =~ m/.{3,}+/g;