- Linux - LUG OWL

Antwort: Re: Sortieren mit Perl...
by Kai.Windmoeller＠rokd.de 26 Jan '00

26 Jan '00

> Dann sortieren bzw sortiert ausgeben ... > > foreach $user ( sort keys %hash ) { > foreach $col1 ( sort keys ${ $hash{$user} } ) { > foreach $col2 ( sort keys ${ $hash{$user}{$col1} } ) { > foreach $col3 ( sort keys ${ $hash{$user}{$col1}{$col2} } ) { > print "$user;$col1;$col2;$col3\n"; > } > } > } > } Dies sortiert, meines wissens nach, primär nach $user, dann nach $col1, dann nach $col2, und dann nach $col3 und ist damit am Ziel vorbei. Perl kann mit rationalen zahlen umgehen und sortieren, weil alle zahlen ersteinmal in perl als rationale gespeichert werden (siehe doku nahe 'use integer') Das oben funktioniert, wenn mann das Hash anders aufbaut foreach (<STDIN>) { my @f=split(/;/,$_); $hash{$f[3]}{$f[1]}{$f[0]}{$f[2]}=1; } foreach $col3 ( reverse sort keys %hash ) { foreach $col1 ( reverse sort keys ${ $hash{$col3} } ) { foreach $user ( sort keys ${ $hash{$col3}{$col1} } ) { foreach $col2 ( sort keys ${ $hash{$col3}{$col1}{$user} } ) { print "$user;$col1;$col2;$col3\n"; } } } } Gruß Kai

2 1

Ethernet Win98/Linux Probs
by Jens Marder 26 Jan '00

26 Jan '00

Hey LUG-OWL Liste, Ich will aus ner 133AmdK6 Kiste mit 2 800MB Platten und 10MBit Karte nen Ethernet TCP/IP Server machen, der auch mit Windows (98) zurechtkommen soll! Alles soweit eingerichtet mit suse 6.1 / route --> eth0 und verkabelung,etc. Aber das Ding ist nicht PINGBAR!!!! ARGL! Woran kanns liegen? TCP/IP laeuft anscheinen auf win98, da internet laeuft und Netzwerkgames ueber TCP/IP mit anderem Rechner auch... ich mag nicht glauben, das linux dran schuld ist... achja, die netzwerkkarte ist ne2000 kompatibel und im Ethernet HOWTO leider als poor Clone eingestuft (Longshine XXX) und wird auch korrekt vom kernel erkannt. HILFE!!! achja, der rechner ist (noch) nicht am internet und nicht bei mir zuhause, deshalb leider keine config-dateien, aber ich gehe davon aus, das ich (und yast) das soweit hinbekommen haben, aber evtl. koennte mir einer noch einen kurzen ueberblick bieten wie ich die karte routen musz (etc.) um den rechner spaeter als gateway fuers ethernetnetz einzusetzen. cu, dustin PS: Hey Alain, meld dich mal ;)) -- Dustin Brinktriene .............oO ICQ#36814257 check out =====> http://www.orderweb.de Oo... =============================================== "Life is hard Beavis" --- "Yeah, and it sucks!" Zu lang?ADSL!Beavis & Butthead - (c) Mike Judge "If Jah is by my side, why should i be afraid?" ===============================================

1 0

Antwort: Sortieren mit Perl...
by Kai.Windmoeller＠rokd.de 26 Jan '00

26 Jan '00

Das einfachste ist, das Schreiben einer eigenen Sortierfunktion. Das is nicht schwierig, weil man nur den Vergleich definieren brauch. @ergebnis = sort {Vergleichsfunktion} (Liste); Häufig findet man das in dieser Form @ergebnis = sort &by_name (Liste); oder so ähnlich. die Funktion hat zwei lokale Variablen definiert $a und $b, der Rückgabewert der Funktion ist -1 wenn $a < $b 0 wenn $a == $b 1 wenn $a > $b Bei Hashes ist $a,$b jeweils der Schlüssel des Eintrags. Du wirst warscheinlich die beinen operatoren <=> und cmp praktisch finden, weil die diese Vergleiche für Zahlen bzw. Strings durch führen $erg = $a <=> $b; Die Funktion die du suchst sieht warscheinlich so aus @Ergebnis = sort &log (@Liste); sub log { local ($erg, @a, @b); @a = split /;/, $a; @b = split /;/, $b; $erg = $b[3] <=> $a[3]; # Falsch rum für umgekehrte Reihenfolge if ($erg == 0) { $erg = $b[1] <=> $a[1]; # Falsch rum für umgekehrte Reihenfolge if ($erg == 0) { $erg = $a[0] cmp $b[0]; } } $erg; } Ich hoffe dies hilft und ich habe keine Fehler gemacht. Gruß Kai

1 0

Modemverbindung zum ISP
by Martin 26 Jan '00

26 Jan '00

Hallo Leute, Ich versuche, mich mit einem analogen ZyXEL Elite 2864D bei einem ISP einzuwählen. Meine Versuche scheitern jedoch immer an der selben Stelle: Login-Skript Fenster: ATZ OK ATM1L1 OK ATDT... CONNECT ... und das Modem "legt auf". Dann kommt ein Fensterchen: "Der ppp-Dämon wurde unerwartet beendet!" Die PPP-Logdatei zeigt: The remote system is required to authenticate itself but I couldn't find any secret (password) which would let it use an IP address. Die kppp-Diagnose hält sich dezent zurück: "Sorry, kann Ihnen hier nicht helfen." ...könnt ihr??? Danke im voraus Martin

3 3

Domain not bound
by Mario Witte 25 Jan '00

25 Jan '00

Mahlzeit! Ein Bekannter, der seit kurzem mit Caldera Openlinux (war wohl kuerzlich auf einer CHIP-Heft-CD) arbeitet berichtete mir von folgendem Problem: Beim einloggen als root erhaelt er die Meldung "Domain not bound". Woran kann das liegen? -- Mario Witte <mario.witte(a)chengfu.de> Microsoft is not the answer. Microsoft is the question. The answer is "NO!"

3 2

DLUG - LUG in Duesseldorf
by Toens Bueker 25 Jan '00

25 Jan '00

Hi *, kennt jemand jemanden in der DLUG? Tschö Töns -- Linux. The dot in /.

2 1

[ADMIN] Spam -- ein Ausblick
by Jan-Benedict Glaw 25 Jan '00

25 Jan '00

Hallo... In letzter Zeit war's mal wieder nicht ganz wenig, was da so an Spam über die Liste ging. Dafür zeichne ich mich (abgesehen von den Spamern selbst) schul- dig und werde am Wochenende wieder einen Check gegen ORBS einführen. Die Konfiguration dazu hab ich soweit (Danke, Flo!), komm aber im Moment nicht dazu, weil ich etwas "ab vom Schuß" bin. Freitag Nachmittab bin ich wieder in der Heimat, dann wird gebastelt. Bis dahin bitte ich um Geduld udn Entschuldigung... MfG, JBG -- Fehler eingestehen, Größe zeigen: Nehmt die Rechtschreibreform zurück!!! keyID=0x8399E1BB fingerprint=250D 3BCF 7127 0D8C A444 A961 1DBD 5E75 8399 E1BB

1 0

kontaktmanagment
by Carsten Umland 24 Jan '00

24 Jan '00

tach, nachdem ich nun mit staroffice einige erfahrungen gemacht habe, suche ich eine effiziente software als kontaktmanagment, möglichs mit dokmentmanagment d.h. ich will alle kunden nach potential sortieren können und nach Besuchsdatum. dann sollen mir alle kunden mit dem dazugehörigen schriftverkehr angezeigt werden. weiß jemand rat? noch was : leider hab ich keine zeit ( und die kenntnisse fehlen mir )so eine datenbank selber zu basteln, deshalb würde ich gerne auf eine fertige lösung zurückgreifen. ähnlich organice von bit by bit ( ist win -software) -- mit freundlichem Gruss Carsten Umland carsten.umland(a)gmx.de

1 0

Suche Tip für passive ISDN-Karte unter SuSE-Linux
by Eduard Müller 24 Jan '00

24 Jan '00

Hallo, hat einer von Euch einen Tip bezügl. einer guten passiven ISDN-Karte für einen PC unter Linux? Ich suche noch eine interne PCI-Karte, die keine Probleme macht. Ach ja, eine zweite Karte brauche ich ja auch noch, diesmal ISA (kein PNP) für einen älternen Rechner. Für jeden Tip bin ich dankbar, für Angebote noch mehr ;-). Bye, Eduard

2 1

hylafax-frage
by Thomas Niesel 24 Jan '00

24 Jan '00

Tach zusammen Habe mir von den RH6.1-Powertools hylafax und mgetty* als rpm's besorgt. Habe daraufhin alles, bis auf mgetty&sendfax installiert, da sich das nicht mit hylafax verträgt. Bin die Schritt für Schritt Installation durchlaufen, soweit sogut. Allerdings steht unter /etc/rc.d/init.d ein script (faxq) welches auf das programm /usr/sbin/faxq verweist; und das ist nicht da. Somit läuft dieses script nicht durch und der dämon wird nicht gestartet. Die Docu erwähnt zwar das Programm, es ist aber nicht dabei. Ich habe mir das dann aus dem hylafax-paket von Susi rauskopiert an die gewünschte Stelle und es scheint zu laufen. Sollt es das jetzt gewesen sein ? Kommt das vor, daß solch Dinge vergessen werden oder ist das was ich nun habe ein work-around das später evtl. zu Problemen führt ? Sind die Sachen unter den Distributionen bedingt austauschbar (nur die scripte sind anders)???

1 0