Actually, it's not working. My code is:
open(INFILE,"X:\\\\ongoing\\bioinformatics\\db2\\image\\picture1.wmf")
+;
binmode(INFILE);
$img_data = <INFILE>;
close(INFILE);
my $stmt = "INSERT INTO project_figures (pjfg_id, pjfg_name, pjfg_imag
+e) VALUES(?,?,?)";
my $sth = $dbh->prepare($stmt);
my $rc = $sth->execute(1,'picture1.wmf', $img_data);
And I get
DBD::ODBC::st execute failed: [IBM][CLI Driver] CLI0110E Invalid outp
+ut or indicator buffer specified. SQLSTATE=22002 (SQL-22002)(DBD: st_
+execute/SQLExecute err=-1) at insert_image.pl line 24.
DBD::ODBC::st execute failed: [IBM][CLI Driver] CLI0110E Invalid outp
+ut or indicator buffer specified. SQLSTATE=22002 (SQL-22002)(DBD: st_
+execute/SQLExecute err=-1) at insert_image.pl line 24.
|