I know I've seen the answer to this question in the past but I can't seem to
find it in the archives or Google. How can I output an image directly from
Perl? I've read about possibly using binmode, but haven't found a working
example.


print "Content-type: image/jpeg\n\n";

open (data_In,"<small.jpg");

print <data_In>;

close (data_In);

_______________________________________________
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to