Thread Umleitung des die() Befehls in Sub-Routine (5 answers)
Opened by YAPD at 2017-08-08 01:27

YAPD
 2017-08-08 01:27
#187167 #187167
User since
2015-09-20
146 Artikel
BenutzerIn

user image
Guten Abend,

noch etwas Kleines. Ich habe ein Script, das eine SSL Verbindung herstellt und folgendermaßen aussieht :

Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
    my $SSL_Server = IO::Socket::SSL -> new(

# Initialisierung der Server - Adresse & des Ports

LocalAddr => $Config_Eintraege -> { SSL_SERVER_ADRESSE } ,
LocalPort => $Config_Eintraege -> { SSL_SERVER_PORT } ,
Listen => 10 ,

# Zertifikate für die Authentifizierung

SSL_passwd_cb => sub{ &PW_Identifizierung } ,

SSL_cert_file => $Config_Eintraege -> { SSL_SERVER_PUBLIC_KEY_FOLDER } . $Config_Eintraege -> { SSL_SERVER_PUBLIC_KEY_IDENTIFIER } ,
SSL_key_file => $Config_Eintraege -> { SSL_SERVER_PRIVATE_KEY_FOLDER } . $Config_Eintraege -> { SSL_SERVER_PRIVATE_KEY_IDENTIFIER } ,

) or die "Fehler bei der Initialisierung der Verbindung : $SSL_ERROR";


Ich möchte jetzt den Die Befehl nun in meine Fehlerhilfe einbauen, also dass
diese z. B. bei falscher PW Eingabe geöffnet wird.

Wie stelle ich das an ?

Also praktisch :

Code: (dl )
or die &Testumgebung";


Eine Idee :)

Viele Grüße & Gute Nacht
YAPD
Yet Another Perl Developer

View full thread Umleitung des die() Befehls in Sub-Routine