[bcn-pm] perl DBI blobs

[albert vilella]

Hola,

em sembla que faré el récord de preguntes de la llista barcelona-pm :-)
Això és bo o és dolent? (uggh, una altra pregunta!)

Bé, volia saber com inserir camps BLOB (binary large objects) en una
taula mySQL amb perl DBI:

Com insereixo un fitxer sencer?

per exemple de la taula:

CREATE TABLE dummy (
	dummy_id	INT(10) UNSIGNED NOT NULL AUTO-INCREMENT,
	my_file		MEDIUMBLOB NOT NULL,
	PRIMARY KEY (dummy_id)
) TYPE INNODB;

com preparo la sentència $sth?

$sth = $dhb->prepare(qq
{INSERT dummy (dummy_id,
		my_file
		)
VALUES (
	NULL,
# => i aquí?
)
}
);

I es pot fer amb fitxers encara oberts? (per exemple, IO::Handle's
encara oberts...)

Gràcies,

Albert