Hallo,
ich habe mehrere Domains. Auf einer davon kann ich CGI-Programme erstellen.
Mit einem solchen Perl-Programm möchte ich alle Namen (nicht den Dateiinhalt) lesen von den Dateien, die in einem bestimmten Verzeichnis in dieser Domain aber auch auf einer anderen Domain liegen. Da die Domains mir gehören, ist dies was Berechtigungen angeht kein Problem.
Wie mache ich das am besten?
Ist eine Passwortabsicherung sinnvoll?

Ob Domain oder nicht, spielt erstmal keine Rolle. Mit http kannst du keine Verzeichnisse auslesen, das geht nur, wenn diese auf dem selben Server liegen oder du Zugriff über FTP hast (oder andere Protokolle mit denen du Zugriff auf die Serverinfrastruktur wie z.b. ssh oder über telnet).

Es wäre also zuerst zu klären, von wo du welche Verzeichnisse einlesen willst.

Das geht nur, wenn du als Nutzer vollen Zugriff auf alle Verzeichnisse aller Domains auf dem Server hast - je nachdem, wie dein Provider den Server betreibt.
Es kann aber auch sein, dass du von einer Domain nur auf Verzeichnisse dieser Domain zugreifen darfst.

Ansonsten ging das so:

Gib mit CGI einen HTTP-Header aus.

Mit File-Find kannst du alle Dateinamen eines Verzeichnisses und dessen Unterverzeichnisse auslesen und in der Funktion wanted die Dateinamen meinetwegen in ein Array speichern.

Andere Methode im Wiki EinUndAusgabeDateinamenImVerzeichnisAuslesen

Dann kannst du mit CGI deine HTML-Seite erstellen und z. B. das Array als sortierte Liste ausgeben.

Eine Passwortabsicherung ist sinnvoll, da sonst jeder sehen kann, welche Dateien du auf deiner Domain hast!
Du kanns sowas mit .htaccess machen oder in dein CGI ein Passwortlogin einbauen.



Wenn du allerdings nicht per CGI auf alle Verzeichnisse aller Domains zugreifen darfst, könnte es vielleicht mit SSH oder telnet gehen.

Ist das ein eigener VServer? Oder nur ein normaler Webspaceprovider?

Ich habe vollen Zugriff auf die Verzeichnisse.

>> Gib mit CGI einen HTTP-Header aus.
Das verstehe ich leider nicht.

>> Mit File-Find kannst du alle Dateinamen eines Verzeichnisses und dessen Unterverzeichnisse auslesen
Wen ich die CPAN-Doku recht verstehe, geht dies nur für Verzeichnisse innerhalb der akt. Domain

>>Andere Methode im Wiki Wissensbasis/EinUndAusgabeDateinamenImVerzeichnisAuslesen
Auch das geht, wie ich vermute nur auf dem akt. Server

Ich habe vollen Zugriff auf die Verzeichnisse.

>> Gib mit CGI einen HTTP-Header aus.
Das verstehe ich leider nicht.

>> Mit File-Find kannst du alle Dateinamen eines Verzeichnisses und dessen Unterverzeichnisse auslesen
Wen ich die CPAN-Doku recht verstehe, geht dies nur für Verzeichnisse innerhalb der akt. Domain

>>Andere Methode im Wiki Wissensbasis/EinUndAusgabeDateinamenImVerzeichnisAuslesen
Auch das geht, wie ich vermute nur auf dem akt. Server

wastl+2009-01-05 14:10:03--

Ich habe vollen Zugriff auf die Verzeichnisse.

Das spielt keine Rolle, hat Perl zugriff auf deise Verzeichnisse? Liegen sie auf dem gleichen server?
Wenn nicht, geht es nur so wie ich schon beschrieben habe.

Ich habe jetzt ein FTP-Beispiel gefunden und es auf meinem lokalen System getestet, leider mit einer Fehlermeldung, die sicher nur von Superexperten verstanden wird.
Aber vielleicht erkennt ihr ja am Perl-Code schon einen Fehler.




Und hier die Meldung:

Software error:

No errno EINPROGRESS at C:/xampp/perl/site/lib//Errno.pm line 82
Errno::FETCH('Errno=ARRAY(0x2bffb50)', 'EINPROGRESS') called at C:/xampp/perl/lib/IO/Socket.pm line 115
IO::Socket::connect('Net::FTP=GLOB(0x2bcdfa4)', '\x{2}\x{0}\x{0}\x{15}\x{7f}\x{0}\x{0}\x{2}\x{0}\x{0}\x{0}\x{0}\x{0}\x{0}\x{0}\x{0}') called at C:/xampp/perl/lib/IO/Socket/INET.pm line 257
IO::Socket::INET::connect('Net::FTP=GLOB(0x2bcdfa4)', '\x{2}\x{0}\x{0}\x{15}\x{7f}\x{0}\x{0}\x{2}\x{0}\x{0}\x{0}\x{0}\x{0}\x{0}\x{0}\x{0}') called at C:/xampp/perl/lib/IO/Socket/INET.pm line 232
IO::Socket::INET::configure('Net::FTP=GLOB(0x2bcdfa4)', 'HASH(0x2bd8a10)') called at C:/xampp/perl/lib/IO/Socket.pm line 48
IO::Socket::new('Net::FTP', 'PeerAddr', 'www.dom2.test', 'PeerPort', 'ftp(21)', 'LocalAddr', 'undef', 'Proto', 'tcp', ...) called at C:/xampp/perl/lib/IO/Socket/INET.pm line 37
IO::Socket::INET::new('Net::FTP', 'PeerAddr', 'www.dom2.test', 'PeerPort', 'ftp(21)', 'LocalAddr', 'undef', 'Proto', 'tcp', ...) called at C:/xampp/perl/site/lib//Net/FTP.pm line 84
Net::FTP::new('Net::FTP', 'www.dom2.test', 'Debug', 0) called at C:/dom1/cgi-bin/Dir_Lesen.pl line 10
ModPerl::ROOT::ModPerl::PerlRun::C_3a_dom1_cgi_2dbin_Dir_Lesen_2epl::handler('Apache2::RequestRec=SCALAR(0x2ba923c)') called at C:/xampp/perl/site/lib/ModPerl/RegistryCooker.pm line 204
eval {...} called at C:/xampp/perl/site/lib/ModPerl/RegistryCooker.pm line 204
ModPerl::RegistryCooker::run('ModPerl::PerlRun=HASH(0x2c41614)') called at C:/xampp/perl/site/lib/ModPerl/RegistryCooker.pm line 170
ModPerl::RegistryCooker::default_handler('ModPerl::PerlRun=HASH(0x2c41614)') called at C:/xampp/perl/site/lib//ModPerl/PerlRun.pm line 31
ModPerl::PerlRun::handler('ModPerl::PerlRun', 'Apache2::RequestRec=SCALAR(0x2ba923c)') called at -e line 0
eval {...} called at -e line 0

wastl+2009-01-05 14:11:44--

>> Gib mit CGI einen HTTP-Header aus.
Das verstehe ich leider nicht.

Ich wußte deinen Wissenstand nicht.



[quote]>> Mit File-Find kannst du alle Dateinamen eines Verzeichnisses und dessen Unterverzeichnisse auslesen
Wen ich die CPAN-Doku recht verstehe, geht dies nur für Verzeichnisse innerhalb der akt. Domain
WIe innerhalb der aktuellken Domain?

Wo sind denn die anderen Domains? Auf verschiedenen Servern?

Quote

>>Andere Methode im Wiki Wissensbasis/EinUndAusgabeDateinamenImVerzeichnisAuslesen
Auch das geht, wie ich vermute nur auf dem akt. Server

Das geht auf dem Server wo dein Skript laufen soll.

wastl+2009-01-05 14:37:03--

Ich habe jetzt ein FTP-Beispiel gefunden und es auf meinem lokalen System getestet, leider mit einer Fehlermeldung, die sicher nur von Superexperten verstanden wird.
Aber vielleicht erkennt ihr ja am Perl-Code schon einen Fehler.

einmal scheint an deiner Installation ein paar Sachen nicht stimmig zu sien und dann solltest du dir mal die Doku durchlesen, da du dich so nicht mit einem FTP server verbinden kannst oder ist dieser ungeschützt?

Dokus:

* CGI
* Net::FTP