Community  »  Perl: Allgemeines Forum

Text-Datenbank abfragen	Seitenanfang
Hallo! Ich habe eine Mitgliederdatenbank die folgende Felder in folgender Reihenfolge enthält: Name, Alter, Geschlecht, Bundesland, Bezirk, X-Koordinate, Y-Koordinate Die Felder sind mit Tabs getrennt. Nun möchte ich eine Abfrage starten. Vom Suchformular übergeben werden: Alter-von, Alter-bis, Geschlecht und entweder das Bundesland, der Bezrik oder eine Koordinate. Nun sollen alle Einträge, je nachdem was übergeben wurde, passend auf das Bundesland, den Bezirk oder im Umkreis der übergebenen Koordinate in Kombination mit dem Alter und dem Geschlecht gefunden werden. Ausgegeben wird dann der Name. Wie kann so eine Suchabfrage aussehen? Zusätzlich hab ich das Problem, dass die Datenbank sehr groß werden könnte und die Suche den Server nicht allzu belasten sollte. Hat jemand einen Gedanken oder Code für mich mit dem ich beginnen kann?? mfg, perler Datum: 15.05.2006-16:23
re: Text-Datenbank abfragen	Seitenanfang
wie wärs damit: my @results; open (DAT, "<deinfile.txt"); while (<DAT>) { chomp; split /\t/; if (($_[1] > $FORM{'Alter-von'} && $_[1] < $FORM{'Alter-bis'}) && $FORM{'Geschlecht'} eq $_[2] && ($FORM{'Bundesland'} eq $_[3] || $FORM{'Bezirk'} eq $_[4] || ($FORM{'Koordinate-X'} == $_[5] && $FORM{'Koordinate-Y'} == $_[6])) { push (@results, [@_]); } } close(DAT); und dann einfach nur noch ausgeben, sollte so klappen das script ist jetzt nicht getestet sollte aber eine gute vorstellung davon geben wie man es machen kann Datum: 15.05.2006-17:26