Schrift
[thread]7840[/thread]

schnelleres OpenDir (Seite 2)

Leser: 2


<< |< 1 2 >| >> 14 Einträge, 2 Seiten
master
 2006-03-30 18:46
#64191 #64191
User since
2003-10-20
610 Artikel
BenutzerIn
[default_avatar]
der chdir trick ist mir bekannt...
nur gefährlich weil man dann immer hin und herspringen muss

chdir($neu)
glob
chdir($alt)\n\n

<!--EDIT|master|1143729996-->
$i='re5tsFam ^l\rep';$i=~s/[^a-z| ]//g;$\= reverse "\U!$i";print;
master
 2006-03-30 19:01
#64192 #64192
User since
2003-10-20
610 Artikel
BenutzerIn
[default_avatar]
Code: (dl )
1
2
3
4
5
6
sub c
{
chdir($home);
@files = glob("*");
chdir($Bin);
}


ist viel langsamer..... komisch..
$i='re5tsFam ^l\rep';$i=~s/[^a-z| ]//g;$\= reverse "\U!$i";print;
sid burn
 2006-03-30 19:07
#64193 #64193
User since
2006-03-29
1520 Artikel
BenutzerIn

user image
Ja, das wollte ich gerade auch schreiben.
Meine Methode ist Müll. Gebe mich ja geschlagen ^^

Habe oben vergessen das glob zu Speichern. Es wird gleich wieder verworfen, wodurch es natürlich schnell ist. Wenn ich es in einem Array Speichere bekomme ich bei mir die gleiche Zeit wie bei Methode A heraus. Bei mir sind es dann 63 Sekunden.

Zum anderen hate ich ja oben Editiert, und deine Aufgabenstellung falsch gelesen, du wolltest ja nur "." und ".." entfernen. ein glob(*) zeigt aber nur die normalen Dateien an, und die versteckten werden ebenfalls nicht angezeigt.

Wenn ich dann "glob(* .*)" mache, ist es definitiv langsamer. Liegt dann bei mir bei 180sec, und ohne das ich dann noch die "." und ".." entfernt habe.

Nur den Dateiname könnte man ohne chdir auch heraus bekommen wenn man das Modul "File::Basename" nimmt. Ich denke aber mal das dies dann sowieso noch langsamer sein wird.
Nicht mehr aktiv. Bei Kontakt: ICQ: 404181669 E-Mail: perl@david-raab.de
master
 2006-03-30 19:59
#64194 #64194
User since
2003-10-20
610 Artikel
BenutzerIn
[default_avatar]
@sid burn
Genau darum nutze ich opendir :-)

früher habe ich oft geglobbt... ein hin und her chdir()-ren...
und wehe, du vergisst mal das chdir() zurückzusetzen... dann gute nacht.. weil wenn dann später z.b. ein

open();
die Probleme ganz lustig werden :-)
$i='re5tsFam ^l\rep';$i=~s/[^a-z| ]//g;$\= reverse "\U!$i";print;
<< |< 1 2 >| >> 14 Einträge, 2 Seiten



View all threads created 2006-03-30 13:32.