[wbxml]使用Perl封装的WBXML的方法

<iframe align="center" marginwidth="0" marginheight="0" src="http://www.zealware.com/csdnblog336280.html" frameborder="0" width="336" scrolling="no" height="280"></iframe>

使用Perl封装的WBXML的方法

编写者	日期	关键词
郑昀@ultrapower	2005-9-20	WBXML XML Perl

利用Perl库XML::WBXML，

就可以执行XML和WBXML(Wap Binary XML)之间的自由转换了：

use XML::WBXML;

$wbxml = XML::WBXML::xml_to_wbxml($xml);

$xml = XML::WBXML::wbxml_to_xml($wbxml);

下面我说一下如何编译这个包。

第一步：

到http://libwbxml.aymerick.com/download.php下载Aymerick Jehanne用C++编写的DLL库

WBXML Library v0.9.0 (download)

第二步：

到http://search.cpan.org/dist/XML-WBXML/lib/XML/WBXML.pm

下载

XML-WBXML-0.02.tar.gz

，这是Perl封装libwbxml2.dll的库。

第三步：

在编译XML-WBXML之前，你必须先修改XML-WBXML-0.02.tar.gz中的Makefile.pl，因为原先它没有指定要link外部的lib。否则当你make时将看到这样的错误：

编译错误：

正在创建库 blib/arch/auto/XML/WBXML/WBXML.lib 和对象

blib/arch/auto/XML/WBXML/WBXML.exp

WBXML.obj : error LNK2019: 无法解析的外部符号 _wbxml_conv_xml2wbxml@16 ，该符号

在函数 _XS_XML__WBXML_xml_to_wbxml 中被引用

WBXML.obj : error LNK2019: 无法解析的外部符号 _wbxml_conv_wbxml2xml@16 ，该符号

在函数 _XS_XML__WBXML_wbxml_to_xml 中被引用

blib/arch/auto/XML/WBXML/WBXML.dll : fatal error LNK1120: 2 个无法解析的外部命令

NMAKE : fatal error U1077: “link” : 返回代码“0x460”

所以，必须加入“MYEXTLIB => 'libwbxml2.lib'”的编译选项：

Makefile.PL：

use 5.008003;

use ExtUtils::MakeMaker;

# See lib/ExtUtils/MakeMaker.pm for details of how to influence

# the contents of the Makefile that is written.

WriteMakefile(

NAME => 'XML::WBXML',

VERSION_FROM => 'lib/XML/WBXML.pm', # finds $VERSION

PREREQ_PM => {}, # e.g., Module::Name => 1.1

ABSTRACT_FROM => 'lib/XML/WBXML.pm', # retrieve abstract from module

AUTHOR => 'David Glasser <glasser>',<p></p></glasser>

LIBS => ['-lwbxml2'], # e.g., '-lm'

DEFINE => '', # e.g., '-DHAVE_SOMETHING'

INC => '-I.', # e.g., '-I. -I/usr/include/other'

# Un-comment this if you add C files to link with later:

#add begin

MYEXTLIB => 'libwbxml2.lib',

# OBJECT => '$(O_FILES)', # link all the C files too

);

第四步：

为了拿到libwbxml2.lib，你必须编译WBXML Library v0.9.0源代码，从而得到这个lib。

并将源代码中的头文件如wbxml.h、wbxml_parser.h等复制到Perl/lib/XML文件夹下，因为编译时需要这些wbxml的头文件。

第五步：

在perl编译出WBXML.DLL之后，要将

libwbxml2.dll和libexpat.dll放在Perl/lib/XML/blib/arch/auto/XML/WBXML文件夹下。