TINYBLOB, TINYTEXT      L+1 bytes, where L < 2^8
BLOB, TEXT              L+2 bytes, where L < 2^16
MEDIUMBLOB, MEDIUMTEXT  L+3 bytes, where L < 2^24
LONGBLOB, LONGTEXT      L+4 bytes, where L < 2^32

##</code><code>##

my $file = <FILE>;
$dbh->do("insert into file_table set data = '$file'");