Suchmaschine (nur) für eigenen Host

servus,<P>du solltest in deiner merkliste nicht nur den verzeichnisnamen sondern den ganzen pfad speichern. die sind ja einmalig  [img]images/icons/wink.gif" border="0[/img]<P>hier ein link zu einem search script<P><A HREF="http://worldwidemart.com/scripts/search.shtml" TARGET=_blank>[Matt Wrights - Simple Search]</A><P><A HREF="http://worldwidemart.com/scripts/cgi-bin/download.cgi?s=search&" TARGET=_blank>[Matt Wrights - Simple Search - Source Code]</A><P><BR>ist halt gleich ne kommplett lösung.<BR>im sub get_files() liest er alle filepfade in ein Array.<P>im sub search() dursucht er dann die files<P>schau dir das mal an<P>vielleicht kannst du da ja durchsteigen<P>gruß<BR>pfuschi<p>[ 09.06.2001: Beitrag editiert von: pfuschi ]

<BLOCKQUOTE><font size="1" face="Verdana, Helvetica, sans-serif">Zitat:</font><HR><BR>machst du deine strucktos am PC mit software oder handschriftlich auf good old paper?<P>kennt jemand da gute freeware?<BR>ich benutz momentan easy case <BR>[/QB]<HR></BLOCKQUOTE><P>WinGESy4 ist auch ganz gut. ( glaub ich zumindest, ) kann man in der DemoVersion allerdings nur 5!!! Elemente hintereinander fügen,<P>kriegt man auch leider nix war*zmäßiges.<P>ich kritzel die Struktogramme mit der Hand und wenns schön werden soll mach ich sie in Word. Wenn man mit PAPs arbeitet ist Word auch ziemlich konfortabel.<P>Zum Script:<P>nette Seite hast du gelinkt,<P>leider hilft mir das Script überhauptnicht weiter, da der Author das Problem ziemlich unelegant umgangen hat. <P>Bevor man das Script installiert muß man es so konfigurieren, das man alle Verzeichnisse die durchsucht werden sollen in ein Array schreibt. Das Script orientiert sich dann an dem Array und nicht an den tatsächlich vorhandenen Verzeichnissen.<P>Perl bietet einem ja alle Möglichkeiten die man braucht um so was automatisch ablaufen zu lassen. <P>Ich weiß halt bloß nicht wie ich drann gehen soll.<P>Aber eigentlich kanns ja wirklich nicht schwierig sein.<P>Ne Schleife die sich so lange durch die Verzeichnisse forstet bis alle Dateien eingelesen sind...<P>...oder so...<P>hmm  [img]images/icons/confused.gif" border="0[/img] <P>cu, sel.

Hash?<BR>Wie wärs damit: im Root alle Dateien checken, dann in den jeweiligen Unterverzeichnissen...   [img]images/icons/cool.gif" border="0[/img]

Hallo,<P>also mein damaliger Mentor sagte immer:<BR>"Zu jedem Problem gibt es unendlich viele Lösungen."<P>Das mit dem Hash ist vielleicht auch 'ne Lösung, hätte aber was von der Geschichte mit den Spatzen und Kanonen...<P>So plump es auch klingt aber prinzipiell hat whiteheart Recht.<BR>Ich gib' dir mal ein bißchen Pseudo-Code, hat ein bißchen was von deinem 2. Lösungsansatz im ersten Posting.<P>funktion rekursivSuche(akt_Ordner)<BR>{<BR>--speichere alle Elemente des akt_Ordner in einem Vektor<BR>--Schleife solange Vektor nicht leer<BR>--{<BR>----nehme Element aus Vektor<BR>----wenn Element Ordner<BR>------rekursivSuche(Ordner)<BR>----andernfalls wenn Datei<BR>------durchsuche Datei nach Suchbegriffen<BR>--}        <BR>}<P>Sieht zwar verdammt wenig aus, mehr ist aber nicht nötig.<BR>Für die Suche selber brauchst du dir nix zu merken,<BR>das erledigt die Rekursion.<BR> <BLOCKQUOTE><font size="1" face="Verdana, Helvetica, sans-serif">Zitat:</font><HR> von Bjarne Stroustrup (Erfinder von C++)<BR>To iterate is human, to recurse is divine.<BR><HR></BLOCKQUOTE><BR>Die Eindeutigkeit erreichst du wie pfuschi schon<BR>sagte über vollständige Pfadangaben.<P>bis dänn, odoggy

Hehe, mit VB hat man das FileSystemObject-Objekt. Da kann man das direkter realisieren (hab so auch n Ordner Baum gemacht).

VB ist halt bei String-Parsing net so gut (RegExps). Aber das FileSystemObject - das ist einfach genial. Mein FolderBrowser macht übrigens das folgende: zeogt erstmal alle Laufwerke, verfügbare mit einem Sharing-Zeichen; sobald jemand was expandiert, geht das hoch und das halt so weiter. Schaut sich auch n Icon für alles aus und all das in schlappen 2-3 Bildschirmseiten (Event Handling und Kapselung eingeschlossen). Wenn mans vernünftig macht, gehts auch auf Perl, aber ohne UI (vernünftig - mit dem gleichen Aufwand). Sag mal was, was du denkst, was VB wahrsch. nich kann und ich schau... <BR>Will aber keinen "Streit" anfangen.

<BLOCKQUOTE><font size="1" face="Verdana, Helvetica, sans-serif">Zitat:</font><HR>Sag mal was, was du denkst, was VB wahrsch. nich kann und ich schau...<HR></BLOCKQUOTE><P>also... VB wurde auf MS Systemen entwickelt, Perl auf Unix. <BR>Was ganz nützliches insbesondere bei MS Produkten: Lese eine Zeile aus dem Kernel deines BS aus. (Falls es mal wieder buggy ist) patche die Zeile, und schreibe sie in den Kernel zurück....<P>Ums vorweg zu nehmen: Ich könnts garantiert nich bei nem Linux/Unix System, vor allem da ich nur mit diesem MS Müll arbeite.  [img]images/icons/frown.gif" border="0[/img] <BR>...aber es geht... <BR> [img]images/icons/smile.gif" border="0[/img]<BR> <BLOCKQUOTE><font size="1" face="Verdana, Helvetica, sans-serif">Zitat:</font><HR><BR>Will aber keinen "Streit" anfangen.<HR></BLOCKQUOTE><BR>Wer will das schon?<BR> [img]images/icons/smile.gif" border="0[/img]<P>cu, sel.

moin,<BR>meine ultimative meinung zu dem thema:<BR><BLOCKQUOTE><font size="1" face="Verdana, Helvetica, sans-serif">Code:</font><HR><pre><BR>my $basedir = "basisverzeichnis :-)";<BR>my $pattern = "*.html";<BR><BR>getfiles($basedir, $pattern);<BR><BR>sub getfilenames() {<BR>  ($dir, $pattern) = $_;<BR>  @files = glob($dir."/".$pattern);<BR>  foreach (@files) {<BR>    if (! -e $dir."/".$_) {<BR>      push (@result, $dir."/".$_);<BR>    } else {<BR>      push(@result, getfilenames($dir."/".$_, $pattern);<BR>    }<BR>  }<BR>  return @result;<BR>}<BR></pre><HR></BLOCKQUOTE><BR>sollte eigentlich funktionieren. falls ich nicht wieder irgendwo einen fehler gemacht habe. aber das debuggen könnt ihr ja machen ;-))<BR><BR>cu s!r tru$t<p>[ 12.06.2001: Beitrag editiert von: sir tru$t ]

perl ist keine geschriebene sprache, sondern eine gemalte. höre auf perl zu lesen, beginne so zu denken ;-)))<P>cu s!r tru$t