1   10
2   20

##</code><code>##

CREATE TABLE data_profile
(
        file  BLOB NOT NULL
 )

##</code><code>##

connection stuff

open (IN, "<$file");
@array=<IN>;

print @array;

$dbh->do ( "INSERT INTO data_profile (file) VALUES (?)",undef,@array);

$dbh->disconnect ();