Dateiname ohne Pfadangabe auslesen
Sebastian Nebel
- perl
0 artes0 Christian Kruse
Mit:
#!/usr/bin/perl
$File = $ENV{'QUERY_STRING'};
use File::Basename;
print "Content-type:text/html\n\n";
print "<CENTER><IMG SRC="$File"></CENTER>";
print basename($0);
Damit bekomme ich nur den Namen des aktuell ausgeführten Scripts. Ich möchte jetzt aber nur den Namen des Bildes (File) in der Form hallo.jpg
Kann mir jemand sagen, wie das funktioniert?
Keine Ahnung.
Aber den Befehl <center></center> soll man doch nicht mehr verwenden?
Hallo Sebastian, <-- sowas nennt man eine Begruessung,
$File = $ENV{'QUERY_STRING'};
use File::Basename;print "Content-type:text/html\n\n";
print "<CENTER><IMG SRC="$File"></CENTER>";
print basename($0);Damit bekomme ich nur den Namen des aktuell ausgeführten
Scripts.
Dann ist der Query-String leer. Du musst auch schon einen
Query-String uebergeben, wenn du ihn auswertest. Besser eignen
wuerde sich ueberigens CGI.pm
Gruesse,
CK