my $frozen = freeze($data);
dosql("insert into blobtest (key,test) values (1,\'$frozen\')");