First you can send a bitmap if you want but as far as I know browsers will only render GIF JPEG and PNG (not all browsers) image formats. To send an image all you need to do is send the appropriate header and then print the content of the image file (binmode on under Win) to STDOUT.

Here is a short example to send a gif. 

$| = 1;       # unbuffer output

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

open GIF, "<image.gif" or die "Oops $!\n";
binmode GIF;
binmode STDOUT;
my $buffer;
while(read(GIF,$buffer,4096)) {
    print $buffer;
}
close GIF;
__END__

[download]

I don't do much with images but there is sure to be a Perl Module to convert to GIF format for you although due to patent problems with the LZW compression in GIFs you usually have to compile support for this format in. GD.pm is a standard image manipulation module. Hope this helps.

cheers

tachyon

s&&rsenoyhcatreve&&&s&n.+t&"$'$`$\"$\&"&ee&&y&srve&&d&&print

In reply to Re: Yet another counter by tachyon
in thread Yet another counter by FixNEthing

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.