my $frozen = freeze($data);
my $command = "insert into blobtest (key,blob) values (1,?)";
my $sth = $dbh->prepare($command);
$sth->execute($frozen) || die "Could not execute MySQL statement: $command";