我试图将一些Google URL Library功能作为perl模块公开.基于这里和其他地方的一些帖子,看起来XSPP可能是一个很好的起点.这是我到目前为止创建的内容(从googleurl lib的编译版本开始)：

我创建了这个xspp文件(为简洁起见省略了一些方法)：

#include "gurl.h"
%typemap{std::string};
%typemap{bool};
%module{Google::URL};
class GURL
{
  %name{new} GURL(std::string& url);
  ~GURL();
  bool is_valid();
  bool is_empty();
  std::string spec();
  std::string possibly_invalid_spec();
  std::string scheme();
  std::string username();
  std::string password();
  std::string host();
  std::string port();
  std::string path();
  std::string query();
  std::string ref();
  bool has_scheme();
  bool has_username();
  bool has_password();
  bool has_host();
  bool has_port();
  bool has_path();
  bool has_query();
  bool has_ref();
};

我创建了这个Makefile.PL文件：

use 5.012;
use Module::Build::WithXSpp;
my $build = Module::Build::WithXSpp->new(
  module_name       => 'Google::URL::GURL',
  license           => 'perl',
  extra_typemap_modules => {
    'ExtUtils::Typemap::Default' => '0.01',
    'ExtUtils::Typemap::STL' => '0.01',
  },
  extra_linker_flags => '-L../googleurl -lgoogleurl',
  extra_compiler_flags => '-I. -I.. -I../googleurl -I../googleurl/base -I../googleurl/src',
);

然后我跑：

perl Makefile.PL && ./Build

..并得到以下错误：

WARNING: the following files are missing in your kit:
    GURL.xs 
Please inform the author.

Created MYMETA.yml and MYMETA.json
Creating new 'Build' script for 'Google-URL-GURL' version '0.01' 
Building Google-URL-GURL
Processing XS typemap files...
Multiple definition of ctype 'std::string' in TYPEMAP section at ~/lib/perlbrew/perls/perl-5.14.2/lib/site_perl/5.14.2/ExtUtils/Typemaps.pm line 819.

有xspp经验的人有任何想法可能导致此错误吗？我可以在上面的GURL.xsp文件中成功运行xspp,它会产生对我来说合理的输出.

解决方法:

ExtUtils::Typemaps::Default的文档清楚地表明它已经包含ExtUtils::Typemaps::STL.如果你从extra_typemaps中删除后者,它应该都可以工作.