User since
2007-05-31
68
Artikel
BenutzerIn
Hallo,
also mein Problem ist, wenn ich einen Ordner durchsuchen will, indem viele txt-Dateien sind, falls der Ordner größer ca. 18KB ist (das sind über 100 txt-Dateien) will perl in diesem ordner nicht suchen, es kommt auch keine
Fehlermeldung heraus etc., es wird in jede txt-Datei nach bestimmten Muster gesucht!
Dieses Problem kommt aber nur, wenn ich einen Verzeichnis unter Unix durchsuchen will, wenn ich den gleichen Verzeichnis auf Windows durchsuchen will mit dem exakt gleichen Skript, dann tut er dies auch, weiß jemand vielleicht was das Problem sein kann, das unter Unix-OS auftritt?
Gruss
User since
2006-01-27
3890
Artikel
HausmeisterIn
Öhm, wie sieht der Code dafür aus?
meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!
User since
2007-05-31
68
Artikel
BenutzerIn
wie es aussieht macht dieser teil probleme, das konnte ich eben rauskriegen, wie kann man diesen teil ersetzen
my @fileliste = <$aktuellerPfadUrspung/*.txt>;
foreach my $datei (@fileliste)
{
der teil sagt nur, dass nur dateien im ordner geöffnet werden sollen, die ein txt-endung haben, wie kann man dieses anderes beschreiben?
User since
2005-01-17
14746
Artikel
Admin1
Du kannst ja die Wildcards in eine eigene Variable speichern.
my $ext = '*.pl'; # oder was gewünscht, auch *.* oder test.??? oder andere Kombi
my @fileliste = <$aktuellerPfadUrspung/$ext>;
User since
2007-05-31
68
Artikel
BenutzerIn
Hi,
ne das hat nichts gebracht, ab da wird nichts mehr geprintet!
Wie kann man es sonst ersetzen?
User since
2006-01-27
3890
Artikel
HausmeisterIn
Ich finde die Informationsbasis immer noch recht mau. Aber stochern wir mal weiter.
Was ist denn der Inhalt von $aktuellerPfadUrspung?
Pfade sind unter WinDOS und Unix verschieden aufgebaut!
meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!
User since
2008-07-21
20
Artikel
BenutzerIn
wie sieht denn deinen opendir-Befehl aus?
User since
2005-01-17
14746
Artikel
Admin1
perl -e "$ext='d*.*';$pfad='.';@files=<$pfad/$ext>;print @files" zeigt bei mir sämtliche Dateien, die mit d anfangen im aktuellen Verzeichnis.
User since
2003-08-04
2145
Artikel
ModeratorIn + EditorIn
Enthält
$aktuellerPfadUrspung evtl. Leerzeichen?
Was passiert, wenn du Folgendes benutzt?
use File::Glob qw/:glob/;
...
my @fileliste = bsd_glob("$aktuellerPfadUrspung/*.txt");
Und wieso heißt es überhaupt "Urspung" statt "Ursprung"? ;-)
User since
2003-10-20
496
Artikel
BenutzerIn
Wie wäre es denn mit grep und einem regulärem Ausruck? Also in etwa so...