Datei als Ordner erkennen (gelöst) (Allgemeines zu Perl)

[thread]17256[/thread]

Datei als Ordner erkennen [gelöst]

Tags: perl5 Ähnliche Threads

Leser: 16

Articles: hide open all | hide show old branches

+3 replies
Gast Kirsten

2012-03-21 09:43
Hallo,

ich versuche gerade in Perl-Skript zu schreiben, indem ich alle Dateien in einem Ordner überprüfen muss, ob sie symbolische Links und Verzeichnisse sind.

Das mache ich folgendermaßen:
Code: (dl )

if( -l $Datei) {...} elsif( -d -e $Datei) {..}
Wenn die Datei nun ein Verzeichnis ist, möchte ich den Namen in ein Array schreiben.

Bsp.: In Ordner A liegen SLink1 OrdnerB und OrdnerC.
Im Array stehen dann folgender Einträge:
Array[0] = ..
Array[1] = OrdnerB
Array[2] = OrdnerC
Array[3] = .

Wie kommen die Einträge mit den Punkten zustande?
Gibt es eine elegante Lösung, dass die Punkte nicht mit berücksichtigt werden?

Vielen Dank
Kirstem
Last edited: 2012-03-21 11:08:01 +0100 (CET)
- +2 replies
- Linuxer
  
  2012-03-21 11:13
  User since
  2006-01-27
  3890 Artikel
  HausmeisterIn
  Das sind die "Standard"-Einträge für das aktuelle Verzeichnis . und das übergeordnete Verzeichnis ... Wenn Du sie nicht in Deinem Array haben willst, musst Du sie (beim Verzeichnis Auslesen oder beim Verarbeiten) explizit ignorieren.
  
  Beispielsweise so (keine Ahnung wie Du es das Auslesen machst):
  
  Code (perl): (dl )
  
  1 2 3 4 5
  
  my $testdir = '/tmp/testing'; opendir my $dh, $testdir or die "opendir($testdir) failed: $!\n"; # verwende alles ausser . und .. my @entries = grep { ! m/^\.\.?$/ } readdir $dh; closedir $dh;
  
  Last edited: 2012-03-21 12:10:25 +0100 (CET)
  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!
  - Gast Kirsten
    
    2012-03-21 12:04
    
    Ok, danke schön.
    Last edited: 2012-03-21 12:09:15 +0100 (CET)

View all threads created 2012-03-21 09:43.