[GastForen Archiv Perl und CGI startdir Suche in mehreren Ordnern

  • Suche
  • Hilfe
  • Lesezeichen
  • Benutzerliste
Archiv - Archivierte Foren
Themen
Beiträge
Moderatoren
Letzter Beitrag

startdir Suche in mehreren Ordnern

Schomo
Beiträge gesamt: 96

3. Mai 2002, 15:26
Beitrag # 1 von 5
Bewertung:
(2253 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Hallo,
ich habe eine Site auf der ich eine Suchmaschine laufen lasse. Nun hab ich das Problem, dass ich die Ordner der site nicht verändern darf. Nun sucht meine kleine Suchmaschine vom cgi-bin Ordner aus mit $startdir='../';Blöderweise sucht die Suchmaschine aber auch im cgi-bin Ordner, was sie nicht soll, da dort die ganzen Templates liegen.
Wie kann ich Perl sagen, dass die Suchmaschine in mehreren Ordnern suchen soll? Vielleicht ne blöde Frage, aber ich bin Perl Neuling.

Gruss Schomo

[ Diese Nachricht wurde geändert von: Schomo am 2002-05-03 15:28 ]
X

startdir Suche in mehreren Ordnern

SabineP
Beiträge gesamt: 7586

3. Mai 2002, 16:45
Beitrag # 2 von 5
Beitrag ID: #3480
Bewertung:
(2253 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Das kann man aus der Ferne schlecht sagen, ohne die Suchmaschine zu kennen.
opendir, readdir und closedir sind Funktionen,
um Verzeichnisinhalte zu lesen.
Dann kann man noch die zu suchenden Dateien nach der Datei-Endung unterscheiden.
Das ist aber nur eine von vielen Möglichkeiten.


als Antwort auf: [#3476]

startdir Suche in mehreren Ordnern

Schomo
Beiträge gesamt: 96

3. Mai 2002, 23:03
Beitrag # 3 von 5
Beitrag ID: #3487
Bewertung:
(2253 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Hi,
ich hab das Script mal schnell online gestellt.
http://www.testort.de/perl.htm

Gruss Schomo


als Antwort auf: [#3476]

startdir Suche in mehreren Ordnern

SabineP
Beiträge gesamt: 7586

4. Mai 2002, 10:37
Beitrag # 4 von 5
Beitrag ID: #3494
Bewertung:
(2253 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Wenn Du die Subroutine "sub suchen" durch diesen Code ersetzt, dann sucht Dein Script in allen Verzeichnissen außer in den Verzeichnissen in denen die Zeichenkette "cgi" vorkommt.

Code:

sub suchen{
my $file=$_;
my $dir=$File::Find::dir;
return if($dir =~ /cgi/i);
$i=0;
return unless -f $file;
return unless -T $file;
return unless $file=~/.+\.((s)?htm(l)?|txt)$/;
open(FILE,"<$file");
while(<FILE>){
$zeile=$_;
$head=1 if($zeile=~/\<head/);
$head=0 if($zeile=~/\<\/head/ || $zeile=~/\<body/);
$zeile=~s/(\<[^\>\<]*\>)//g;
$zeile="" if($head);
if(($caps eq "on") && $zeile=~/$suchbegriff/){
for(;$zeile=~m/$suchbegriff/g;++$i){
}
}
if(($caps eq "") && $zeile=~/$suchbegriff/i){
for(;$zeile=~m/$suchbegriff/gi;++$i){
}
}
}
close(FILE);
$liste{"$dir/$file"}="$i" if($i>0);
$_=$file;
}



In der Variable "$startdir" steht das Startverzeichnis drin relativ zum Suchscript.

../ bedeutet eine Verzeichnisebene höher
../../ bedeutet zwei Verzeichnisebenen höher


als Antwort auf: [#3476]

startdir Suche in mehreren Ordnern

Schomo
Beiträge gesamt: 96

6. Mai 2002, 15:31
Beitrag # 5 von 5
Beitrag ID: #3570
Bewertung:
(2253 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Tausend Dank,
kommt sehr gut. Das ist mir eine grosse Hilfe gewesen!!!!!!!!!!
Ich war schon schwer am schwitzen.

Liebe Grüsse Schomo


als Antwort auf: [#3476]
X

Veranstaltungskalender

Hier können Sie Ihre Anlässe eintragen, welche einen Zusammenhang mit den Angeboten von HilfDirSelbst.ch wie z.B. Adobe InDesign, Photoshop, Illustrator, PDF, Pitstop, Affinity, Marketing, SEO, Büro- und Rechtsthemen etc. haben. Die Einträge werden moderiert freigeschaltet. Dies wird werktags üblicherweise innert 24 Stunden erfolgen.

pdf-icon Hier eine kleine Anleitung hinsichtlich Bedeutung der auszufüllenden Formularfelder.

Veranstaltungen
14.05.2024

Online
Dienstag, 14. Mai 2024, 10.00 - 10.30 Uhr

Webinar

Prozessoptimierung ist ein Teamsport! Keine Software und keine Maschine allein kann Ihnen helfen, die Effizienzpotenziale Ihres Betriebes maximal auszuschöpfen. Von der Auftragsannahme über die Vorstufe und den Druck bis hin zur Weiterverarbeitung – alles muss optimal ineinandergreifen. Apropos Weiterverarbeitung – in vielen Druckbetrieben fristet sie in Sachen Prozessoptimierung immer noch ein Schattendasein. Dabei liegen hier mittlerweile die größten Einsparpotenziale! In einem Webinar von Horizon und Impressed erfahren Sie, wie Sie diese Einsparungen realisieren können. Horizon, bekannt für innovative Lösungen in der Druckweiterverarbeitung, bietet mit iCE LiNK eine Workflowlösung für die Weiterverarbeitung. iCE LiNK überwacht, visualisiert und analysiert Produktionsabläufe und unterstützt bei der Wartung – damit immer alles reibungslos läuft. Den gleichen Anspruch hat der von Impressed entwickelte Impressed Workflow Server – er ist die smarte PDF-Workflow-Lösung für Druckereien, die Datenmanagement, Preflight und Produktionssteuerung übernimmt. Im Webinar zeigen Ihnen die Experten von Horizon und Impressed, wie beide Lösungen im Team die Effizienz und Produktivität Ihres Betriebes steigern können. Melden Sie sich am besten gleich an, wir freuen uns auf Sie! PS: Melden Sie sich in jedem Fall an – sollten Sie zum Termin verhindert sein, erhalten Sie die Aufzeichnung.

kostenlos

Ja

Organisator: Impressed / Horizon

https://www.impressed.de/schulung.php?c=sDetail&sid=327

Einsparpotenziale in der Weiterverarbeitung
Veranstaltungen
16.05.2024

Online
Donnerstag, 16. Mai 2024, 10.00 - 10.30 Uhr

Webinar

Komplizierte, kleinteilige Aufträge; alles sehr speziell; seit Jahren bewährte Prozesse – da können wir nichts standardisieren und automatisieren! Das sagen viele Großformatdrucker – aber stimmt das wirklich, ist dem tatsächlich so? Günther Business Solutions und Impressed treten in einem Webinar den Gegenbeweis an. Experten beider Unternehmen zeigen, wie Großformatdrucker vom Einsatz zweier bewährter Lösungen profitieren können: • von advanter print+sign von Günther Business Solutions, dem ERP-System für den Großformatdruck, dass alle Phasen der Wertschöpfung im Large Format Printing abdeckt • von Impressed Workflow Server, der smarten PDF-Workflow-Lösung für Druckereien, die Datenmanagement, Preflight und Produktionssteuerung übernimmt Über die Kombination beider Lösungen können Großformatdrucker ihre Prozesse mit modernen Workflows Schritt für Schritt automatisieren – und so zügig deutliche Zeit- und Kosteneinsparungen realisieren. Das Webinar sollten Sie sich nicht entgehen lassen – damit Sie keine Effizienzpotenziale mehr liegen lassen. Melden Sie sich am besten gleich an, wir freuen uns auf Sie! PS: Melden Sie sich in jedem Fall an – sollten Sie zum Termin verhindert sein, erhalten Sie die Aufzeichnung.

kostenlos

Nein

Organisator: Impressed / Günther Business Solutions

https://www.impressed.de/schulung.php?c=sDetail&sid=326

Und es geht doch: Automatisierung im Großformatdruck!