Peter G.: Grafik einlesen/ausgeben

Beitrag lesen

Guten Tag,

Kann mir mal jemand posten wie man in Perl ein Grafik einlist
und ausgibt (nur die Grafik ohne HTML) ?
Müsste das nicht so in der Art aussehen ?

open(GRAFIK, "<test.jpg");
my @test = <GRAFIK>;
close(GRAFIK);
print "Content-type: image/jpeg\n\n";
print @test;

Wäre auch für'n Link zu dem Thema in SelfHTML dankbar.

Grüße,
Peter.