Hallo, Am Thu, 16 Feb 2012, Sebastian Reinhardt schrieb:
On 16.02.2012 09:44, David Haller wrote: Danke für die Ideen, nur leider bin ich schon weiter und es geht eben trotzdem nicht. Das zweite "closedir" hatte ich von Hand in die Mail rein geschrieben, da ich das beim Kopieren vergessen hatte...:-). Der Header sieht so aus: #!/usr/bin/perl -T # # # verwendete Module # use CGI qw(:standard); use CGI::Carp qw(fatalsToBrowser); use CGI qw(-utf8);
#!/usr/bin/perl -T use warnings; use strict; use CGI qw(:standard -utf8); use CGI::Carp qw(fatalsToBrowser); ...
use URI::Escape; use Encode::Guess; use utf8; Das Script wird i.Ü. so aufgerufen: http://localhost/cgi-bin/gallery.pl?lang=de&basedir=Media/Alttraktoren/Torbogengut_11
Na dann hoffe ich mal, daß du basedir auch schön un"taint"est.
In dem Verzeichnis ist eben ein Unterverzeichnis "thumb" enthalten.
In welchem???
Das möchte ich eben dem Nutzer nicht anzeigen, sondern gleich die Bilder. Wenn ich das Script mit dem Verzeichnis "Media/Alttraktoren/Torbogengut_11/thumb" aufrufe kommen die Bilder und das Verzeichnis ist lesbar. Das ist eben der Punkt, den ich nicht verstehe!
Welches ist im Script das aktuelle? Füge mal nach den anderen 'use' Direktiven folgendes ein: ==== use Cwd; die "PWD=" . cwd() . "\n"; ==== Hint: perldoc -f chdir
Alles sehr komisch...
Überhaupt nicht. -dnh -- Bored? Want hours of entertainment? Just set the initdefault to 6! Whee! -- Um die Liste abzubestellen, schicken Sie eine Mail an: opensuse-de+unsubscribe@opensuse.org Um den Listen Administrator zu erreichen, schicken Sie eine Mail an: opensuse-de+owner@opensuse.org