Datensätze auslesen - Semikolon-getrennt - #159771 (Allgemeines zu Perl)

Gast Muffi

2012-07-12 10:49

Code (perl): (dl )

1
2
3

while (@Druckernamen) {
  printf Printer "Druckername:%s;IPAdresse:%s\n", shift @Druckernamen , shift @IPAdressen;
}

Allerdings: Immer wenn du mehrere Arrays synchron halten musst deutet das sehr stark auf eine ungünstige Datenstruktur/Datenhaltung hin.
Spätestens wenn dann noch ein paar dazukommen, z.B. @Freigabepasswoerter, ... und dann brauchts noch irgendeinen sort wirds fürchterlich.

Wie wärs denn z.B. mit einem Hash?

Code (perl): (dl )

1
2
3

my %drucker = ();
$drucker{$sein_name} = $ip;
...

Last edited: 2012-07-12 10:54:07 +0200 (CEST)