if ($check =~ /[a-z]/ and 
    $check =~ /[A-Z]/ and 
    $check =~ /[0-9]/ and 
    $check !~ /\b$vorname\b/ and 
    $check !~ /\b$nachname\b/ and 
    $check =~ /^[a-zA-Z0-9]+$/
    ) {
    print "super";
} else {
    print "Passwort ungültig.";
}