Frank Schönmann: Grafiken per CGI-Skript an Browser senden

Beitrag lesen

hi!

#!/usr/bin/perl
print "Content-type: image/gif \n\n";
print "grafik.gif";

=== cut ===
#!/usr/bin/perl -w

print "Content-type: image/gif\n\n";
open GIF, "<grafik.gif";
binmode GIF;
binmode STDOUT;
while (read GIF, $buf, 1024)
{
  print;
}
close(GIF);
=== cut ===

Probier das mal, ist aber ungetestet. Ich weiß nicht, ob das so funktioniert.

bye, Frank!