冥思苦想也没找到思路，用Perl能把关系数据库中的数据包装成binary格式导出吗？

zhouhaiming

create table bin
(
  f_char char(10) null,
  f_varchar varchar(20) null,
  f_numeric numeric(12, 2) null,
  f_date date null,
  f_timestamp timestamp null
);

insert into bin values('a1', 'b1', 13.03, date('2007-07-25'), current timestamp);
insert into bin values('a2', 'b2', 32.98, date('2007-07-26'), current timestamp);
insert into bin values('a3', null, null, date('2007-07-27'), null);
insert into bin values(null, 'b4', null, null, current timestamp);

附件是用数据库自己的工具导出的二进制数据

zhouhaiming

把bin.rar直接改名为bin.txt或bin都行，不是rar压缩包，因为其它扩展名的不让上传

因为用数据库自己的工具导出的二进制数据在不同平台下是不一样的，我估计跟CPU芯片类型有关系，所以考虑用Perl导出，好让不同平台都兼容

flw

perldoc DBI
然后自己定义一个格式就可以了。

zhouhaiming

我试了，字符型数据没问题，用pack处理一下，但numeric就不行，用DBI读出来的也是文本，跟用数据库导出来的不一样

zhouhaiming

其实Perl中并没有numeric类型的数据，我用CLI接口编过程序，在c语言中numeric都是用结构体表达的

zhouhaiming

我要输出的是二进制数据，不是格式化的文本

apile

其实你应该多看看pack的document...

应该可以解决numberic的问题....

注意pack/unpack必须成对...

怎麽pack的就要怎麽unpack还原...

同样的unpack/pack也一样...
我没用过你的数据库...不知道numeric是什麽格式...

lokchungk

駱馬書有教
我有電子版的駱馬書第四版
要的話email 給我
email:lokchungk@hotmail.com