SSL_passwd_cb => sub{ my $PW_Identifizierung_Rueckgabe = &PW_Identifizierung( ); print "Rueckgabe : $PW_Identifizierung_Rueckgabe" , "\n"; } ,