MySQL represents binary data via the BLOB datatype. There are actually four types of blob: TINYBLOB, BLOB, MEDIUMBLOB, and LONGBLOB, which respectively can hold up to 2^8, 2^16, 2^24, and 2^32 bytes of binary data. You can treat blobs just like any other text variable, since Perl correctly handles binary data in scalars anyhow.

To get a file from a browser, you'll need to use a file upload field. Take a look at the advise other Monks have given on this topic here; using CGI.pm is both the easiest and most foolproof way to go. CGI.pm will put the contents of the file into a scalar for you; to get it into the database, construct an INSERT with placeholders and pass the do function your file variable.

When you want to return the file to the user, you first need to retrieve it from the database with an appropriate fetch command. Once you have it in a scalar, you should print the appropriate header for your filetype (here, "image/gif") and then print your variable. CGI.pm can once again help you out here; this statement will do what you need:

print header(-type='image/gif'), $data;

In reply to Re: How do I enter and retrieve a GIF File from mysql via CGI? by athomason
in thread How do I enter and retrieve a GIF File from mysql via CGI? by Anonymous Monk

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.