DBD::DB2安装失败，因为在Strawberry Perl上使用cpan进行测试

Question

我是perl的新手，我正尝试在使用cpan的windows PC上为perl安装DBD::DB2模块，但我一直收到这个错误：

CPAN: CPAN::SQLite loaded ok (v0.212)
Database was generated on Thu, 06 Dec 2018 20:55:19 GMT

Running install for module 'DBD::DB2'
CPAN: Digest::SHA loaded ok (v6.02)
CPAN: Compress::Zlib loaded ok (v2.081)
Checksum for D:\STRAWB~1\cpan\sources\authors\id\I\IB\IBMTORDB2\DBD-DB2-1.85.tar.gz ok
CPAN: Archive::Tar loaded ok (v2.32)
CPAN: YAML::XS loaded ok (v0.75)
CPAN: CPAN::Meta::Requirements loaded ok (v2.140)
CPAN: Parse::CPAN::Meta loaded ok (v2.150010)
CPAN: CPAN::Meta loaded ok (v2.150010)
Configuring I/IB/IBMTORDB2/DBD-DB2-1.85.tar.gz with Makefile.PL

Configuring DBD::DB2...
Remember to actually read the README and CAVEATS files!

Using DB2 in "D:/SQLLIB"
System: perl5.028001 DBI1.642 Win32 strawberry-perl 5.28.1.1 #1 Sun Dec  2 14:24:00 2018 x64 MSWin32-x64-multi-thread dl_win32.xs
Compiler: gcc -s -O2  -s -O2 -DWIN32 -DWIN64 -DCONSERVATIVE -D__USE_MINGW_ANSI_STDIO -DPERL_TEXTMODE_SCRIPTS -DPERL_IMPLICIT_CONTEXT -DPERL_IMPLICIT_SYS -DUSE_PERLIO -fwrapv -fno-strict-aliasing -mms-bitfields
Includes:  -I"D:/SQLLIB/include" -I"D:\STRAWB~1\perl\site\lib/auto/DBI" -I"D:\STRAWB~1\perl\lib/auto/DBI" -I"D:\STRAWB~1\perl\vendor\lib/auto/DBI" -I"D:\STRAWB~1\perl\site\lib/auto/DBI" 
Libraries: -L"D:/SQLLIB/lib" db2cli.lib db2api.lib

Checking if your kit is complete...
Looks good
Checking if your kit is complete...
Looks good
Writing MYMETA.yml and MYMETA.json
Generating a gmake-style Makefile
Writing Makefile for DBD::DB2
Writing MYMETA.yml and MYMETA.json
IBMTORDB2/DBD-DB2-1.85.tar.gz
D:\Strawberry\perl\bin\perl.exe Makefile.PL -- OK
Running make for I/IB/IBMTORDB2/DBD-DB2-1.85.tar.gz
CPAN: Module::CoreList loaded ok (v5.20181130)
cp DB2.pm blib\lib\DBD\DB2.pm
cp DB2.pod blib\lib\DBD\DB2.pod
cp lib/Bundle/DBD/DB2.pm blib\lib\Bundle\DBD\DB2.pm
gmake[1]: Entering directory 'D:/STRAWB~1/cpan/build/DBD-DB2-1.85-10/Constants'
AutoSplitting ..\blib\lib\DBD\DB2\Constants.pm     (..\blib\lib\auto\DBD\DB2\Constants)
Running Mkbootstrap for Constants ()
"D:\Strawberry\perl\bin\perl.exe" -MExtUtils::Command -e chmod -- 644     "Constants.bs"
"D:\Strawberry\perl\bin\perl.exe" -MExtUtils::Command::MM -e cp_nonempty -- Constants.bs    ..\blib\arch\auto\DBD\DB2\Constants\Constants.bs 644
"D:\Strawberry\perl\bin\perl.exe"    "D:\Strawberry\perl\lib\ExtUtils/xsubpp"  -typemap   D:\STRAWB~1\perl\lib\ExtUtils\typemap  Constants.xs > Constants.xsc
"D:\Strawberry\perl\bin\perl.exe" -MExtUtils::Command -e mv -- Constants.xsc Constants.c
gcc -c -I"D:/SQLLIB/include" -I"D:\STRAWB~1\perl\site\lib/auto/DBI" -I"D:\STRAWB~1\perl\lib/auto/DBI" -I"D:\STRAWB~1\perl\vendor\lib/auto/DBI" -I"D:\STRAWB~1\perl\site\lib/auto/DBI"   -I"D:/SQLLIB/include" -s -O2 -DWIN32 -DWIN64 -DCONSERVATIVE -D__USE_MINGW_ANSI_STDIO -DPERL_TEXTMODE_SCRIPTS -DPERL_IMPLICIT_CONTEXT -DPERL_IMPLICIT_SYS -DUSE_PERLIO -fwrapv -fno-strict-aliasing -mms-bitfields -s -O2   -DVERSION=\"1.85\" -DXS_VERSION=\"1.85\"  "-ID:\STRAWB~1\perl\lib\CORE" -   DDB2_CACHE_FIX    Constants.c
gmake[1]: Leaving directory 'D:/STRAWB~1/cpan/build/DBD-DB2-1.85-10/Constants'
IBMTORDB2/DBD-DB2-1.85.tar.gz
D:\STRAWB~1\c\bin\gmake.exe -- NOT OK
Stopping: 'install' failed for 'DBD::DB2'.

我尝试从另一台计算机复制DBD::DB2模块，但没有成功，并给出了错误: Can't locate loadable object for module DBD::DB2::Constants in @INC，感谢您的帮助。

Answer 1

根据这个technote，IBM印度(可能是DBD:DB2的维护者)使用ActiveState Perl支持DBD:db2 for Windows。technote还展示了如何使用ppm获取预建模块。

如果您不关心哪个Perl供应商，请考虑使用Activestate Perl for Windows。如果您一定要坚持使用Strawberry Perl，请继续阅读。

当前的v11.1DB2-LUW还表明，除了ActiveState Perl之外，以下语句还支持32位Strawberry-Perl：

使用Db2的Perl的工作版本是Activestate Perl和32位Strawberry Perl。特别是对于32位Strawberry Perl，您必须向opendev@us.ibm.com发送电子邮件或联系IBM support以获取所需的二进制文件。

如果您有Db2的支持合同，您可能希望与他们检查Db2文档是否准确(通常对于非核心内容，它是不准确的、过时的、误导性的等)，以及他们是否可以为DBD::DB2发布64位二进制文件。

查看CPAN页面以了解DBD:DB2的更改，最近的更改似乎是在2012年。因此，目前还不清楚这个模块是否得到了维护。

在同一站点上，还有一个2013年开放的issue，即DBD:DB2无法使用Strawberry perl构建。

我相信一个有决心的C程序员能够解决issue...the的问题，那就是是否有足够的用户来麻烦……

Answer 2

我已经找到了解决这个问题的方法，只需插入以下文件：

• Constants/Constants.xs
• DB2.h

 #ifndef __DBD_DBI_FIX__
 #define __DBD_DBI_FIX__
     #include <specstrings.h>
     #ifndef __out_ecount_opt
         #define __out_ecount_opt    SAL__out_ecount_opt
     #endif
     #ifndef __in_ecount_opt
         #define __in_ecount_opt  SAL__in_ecount_opt
     #endif
     #ifndef __out_bcount_opt
         #define __out_bcount_opt    SAL__out_bcount_opt
     #endif
 #endif

完整的修复方法在这里：https://github.com/ro-ag/DBD-DB2-1.86/commit/1ad9d4163656d9830fd567caf6d57603045ee392

你也可以直接从我为Windows10创建的PPM包中安装它：https://github.com/ro-ag/Perl-64-PPM/raw/master/PPM-64/DBD-DB2.tar.gz

忘记了cpan模块我已经向IBM发送了几封电子邮件，要求包含此修复，但都没有成功。

Answer 3

不是回答，而是一个问题。您的DBD-DB2-tar.gz缺少草莓perl安装所需的PPD文件。