Dateiname ohne Pfadangabe auslesen

[Christian Kruse]

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