Opened by iche at 2012-04-20 16:13
Im Logfile finde ich massenhaft dieser Meldungen: "Use of uninitialized value $connectionerror in numeric ne (!=) at ... "
Die Sub "dbconnect" wird aus einem anderen Skript aufgerufen, die Datei, wo "dbconnect" codiert ist, ist ein Package, welches mit "use" eingebunden wird.
Der Programmcode in dem Package sieht so aus:
Ich sehe jetzt nicht, wo mein Fehler liegt. Warum kennt das Programm die Variable "$connectionerror" nicht?
Danke :)
Last edited: 2012-04-20 16:23:06 +0200 (CEST)
Die Sub "dbconnect" wird aus einem anderen Skript aufgerufen, die Datei, wo "dbconnect" codiert ist, ist ein Package, welches mit "use" eingebunden wird.
Der Programmcode in dem Package sieht so aus:
Code (perl): (dl
)
1 2 3 4 5 6 7 8 9
my $connectionerror; sub dbconnect { my $db = DBI -> connect(...) || &connectionerror; if ($db && $connectionerror != 1) {...} } sub connectionerror { $connectionerror = 1; }
Ich sehe jetzt nicht, wo mein Fehler liegt. Warum kennt das Programm die Variable "$connectionerror" nicht?
Danke :)
Last edited: 2012-04-20 16:23:06 +0200 (CEST)