Thread Verzeichnis und Unterverzeichnis auslesen mit Berechtigungen (5 answers)
Opened by TOGL at 2015-02-11 10:58

TOGL
 2015-02-11 10:58
#179577 #179577
User since
2015-02-11
2 Artikel
BenutzerIn
[default_avatar]
Hallo zusammen,

ich bin absoluter Anfänger in Sachen Perl und hoffe, hier richtig zu sein mit meinem Thread (falls nicht, habt Nachsicht mit mir :p)

Ich habe folgendes Problem:
Mit einem Perl Skript soll ich ein Verzeichnis im Netzlaufwerk durchsuchen, die darin enthaltenen Verzeichnisse (+ deren Unterverzeichnisse) und Dateien ausgeben mit deren Berechtigungseinstellungen (wer darf wie darauf zugreifen).

So, jetzt hab ich damit angefangen, mir die Verzeichnisse und Dateien anzeigen zu lassen. Problem: Ich darf keine Perl Bibliothek nutzen. Sondern nur die Perl.exe und perl58.dll --> somit fallen Funktionen wie stat oder glob weg.

Bisher bin ich wie folgt vorgegangen:

Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27

#!/usr/local/bin/perl -w

my $Startverzeichnis = 'H:';
my $i = 0;                                            #i entspricht Ordneranzahl
my $j = 0;                                            #j entspricht Dateien

opendir DIR, $Startverzeichnis or die $!;
while( my $entry = readdir DIR )
        {
                if($entry ne "." && $entry ne "..")
                {
                        if(-d $entry)
                        {
                                print "<", $entry,">"," ist ein Verzeichnis\n";
                                $i++;
                        }
                        elsif(-f $entry)
                        {
                                print "<", $entry,">", " ist eine Datei\n";
                                $j++
                        }
                        print $entry,"\n";
                }
        }
print $i, " = Anzahl der Verzeichnisse\n";
print $j, " = Anzahl der Dateien\n";
closedir DIR;


Ich will also zwischen Verzeichnissen und Dateien unterscheiden, um im Nachhinein Unterverzeichnisse wiederrum durchlaufen zu können.
Allerdings funktioniert das Ganze nicht, weil mir angezeigt wird, dass 0 Dateien und 0 Verzeichnisse vorhanden sind.
Mir werden alle Ordner und Dateien angezeigt, aber die if-Schleife zum Unterscheiden von Verzeichnis oder Datei funktioniert nicht.

Kann mir vielleicht jemand helfen?

Vielen Dank im Voraus!

MfG

Edit reneeb: b-Tags -> code-Tags
Last edited: 2015-02-11 11:30:14 +0100 (CET)

View full thread Verzeichnis und Unterverzeichnis auslesen mit Berechtigungen