Select Code to Download

while($sth->fetch()) {
        # zusatz scheint NULL zu sein...
...
            $err_txt .= "updatePLZInformationen => FEHLER:\n$@\n";
        }
    }

sub updatePLZInformationen() {
    # überträgt geänderte PLZ-Daten
...

}
# --------------------------------------------------------------------
+---------------------------- #

test@testmachine:~/test/DataSyncTool> ./data_sync_tool.pl
16:12:2008 09:14:13, DEBUG: Programm gestartet...
...
Not an ARRAY reference at data_service.pm line 161.

16:12:2008 09:14:13, DEBUG: updatePLZInformationen => Fertig.

foreach(@$plz) {
...
}