High, high ...
* Kai Wilke <kiste@netzworkk.de> schrieb am [30.03.10 00:32]:
> High, high ...
> * Hans-Dietrich Kirmse <hd.kirmse@gmx.de> schrieb am [29.03.10 23:38]:
> > Hallo Kai,
> >
> > Kai Wilke schrieb:
> >
> > >Use of uninitialized value $lease_file in stat at ./djb_update line 174.
> [....]
> > ergänzt du folgende foreach-Schleife:
> >
> > foreach my $key qw(domain_name lease_file tinydnspath
> > dhcp_dnsfile static_dnsfile update_freq debug) {
> > if ($meine_daten{$key} eq undef) {
> > print "Der Value von $key ist nicht definiert -> Abbruch!\n";
> > exit(1);
> > }
> > }
>
> Getan.
>
> >
> > Dann wird abgebrochen, wenn er einen der Werte nicht kennt und gibt dir
> > den Key aus.
>
> Danke, das wäre auch noch dazu gekommen.
>
> Funzt alles nicht.
>
> Hier mal die Ausgabe der "foreach" Schleife, mit dem Operator "ne".
> Abschnitt:
>
> if ($meine_daten{$key} ne undef) {
>
> Use of uninitialized value in string ne at ./djb_update line 97.
> Der Value von domain_name ist nicht definiert -> Abbruch!
> ...]
Hier mal die Ausgabe der "foreach" Schleife, mit dem Operator "eq".
Abschnitt:
if ($meine_daten{$key} eq undef) {
Use of uninitialized value in string ne at ./djb_update line 97.
Use of uninitialized value in string ne at ./djb_update line 97.
...
dhcpd.leases changed - updating DNS
Skipping suffbook.netzworkk.de dhcp dns entry: static entry with same
name exist
Variablen wurden so deklariert:
my $domain_name = $meine_daten{'domain_name'} || "netzworkk.de";
und
my $domain_name = $meine_daten{'domain_name'};
Geht also schon mal fast, bis auf die Fehlermeldung. Ordentlich tun tut
es nach dem Start.
mfg Kiste
--
#######################################################################
Netzworkk grml - Linux Live CD fuer Sysadmins
Kai Wilke http://grml.org
kiste@netzworkk.de
http://www.netzworkk.de
http://netzworkk.berlios.de
Attachment:
signature.asc
Description: Digital signature