Hallo,
ich habe ein kleines Script, mit dem Textdaten ausgegeben werden. Zum Aufruf des Scriptes in HTML möchte ich den img-Tag verwenden. Bei dem muss aber ja das Script ein Bild zurückgeben.
Nun habe ich dafür dieses Script "gebastelt":
#!/usr/bin/perl
use CGI;
print "Content-type: text/plain\n\n";
$numm = param('num');
$file = '../ads/bannerclick'.$numm.'.inc';
open(INFO, $file); # File öffnen
@lines = <INFO>; # in Array einlesen
close(INFO); # File schliessen
print @lines; # Array ausgeben
print "Content-type: image/gif\n\n";
open (GIF, "http://www.xyz.de/Pics/blind.gif") || die "not found $!";
@pic=< GIF >;
print @pic;
close (GIF);
Leider funktioniert es nicht. Die Daten der .inc-Dateien werden nicht ausgegeben. Und das 1x1-gif wird auch nicht ausgegeben.
Vielleicht kann mir hier jemand helfen ?
Danke,
Swen