• 设为首页
  • 点击收藏
  • 手机版
    手机扫一扫访问
    迪恩网络手机版
  • 关注官方公众号
    微信扫一扫关注
    公众号

c++中嵌入perl,python

原作者: [db:作者] 来自: [db:来源] 收藏 邀请
昨日无意翻了下“黑豹书”(perl 高级编程),发现里面的嵌入perl解释器的那部分
内容已经过时了,写下过程,关键点就是找到perl安装路径的lib\CORE
里面有 perl58.lib 或perl.lib ,
还有就是头文件 EXTERN.h and perl.h 。

代码为:interp.c(来自perldoc)
    #include <EXTERN.h>               /* from the Perl distribution     */
#include <perl.h> /* from the Perl distribution */

static PerlInterpreter *my_perl; /*** The Perl interpreter ***/

int main(int argc, char **argv, char **env)
{
PERL_SYS_INIT3(&argc,&argv,&env);
my_perl = perl_alloc();
perl_construct(my_perl);
PL_exit_flags |= PERL_EXIT_DESTRUCT_END;
perl_parse(my_perl, NULL, argc, argv, (char **)NULL);
perl_run(my_perl);
perl_destruct(my_perl);
perl_free(my_perl);
PERL_SYS_TERM();
}

编译器如果是vc的话把 lib\CORE 路径加上 里面的include 和lib要设置
如果是gcc:
    % gcc -O2 -Dbool=char -DHAS_BOOL -I/usr/local/include
-I/usr/local/lib/perl5/i586-linux/5.003/CORE
-L/usr/local/lib/perl5/i586-linux/5.003/CORE
-o interp interp.c -lperl -lm
win平台的把-I -L换成你的CORE路径 -l 换成你的perl58=》对应perl58.lib

然后运行这个程序interp(interp.exe)就可以当perl解释器用了。

    % interp -e 'printf("%x", 3735928559)'
deadbeef

    % interp
print "Pretty Good Perl \n";
print "10890 - 9801 is ", 10890 - 9801;
<CTRL-D>
Pretty Good Perl
10890 - 9801 is 1089
更进一步应用可以改红色的两行。

python的嵌入也是一样 需要的python的头文件和lib

#include <Python.h> int main(int argc, char *argv[]) { Py_Initialize(); PyRun_SimpleString("from time import time,ctime\n" "print 'Today is',ctime(time())\n"); Py_Finalize(); return 0; } 编译器参数安装perl的来改;
python随带的doc说的很清楚,另外boost里面也有直接嵌入python的库,需要编译
bjam好辛苦。

嵌入解释器的最典型的案例就是emacs,它嵌入了lisp解释器,使之就如一个操作系统一样
不止是扩展和定制这么简单。应用到自己的项目,就可以给用户更多的方便,当然这就得
使用堆栈访问的高级特性了。

那c++ 和perl、python 两个程序分离不也行么?使用临时文件做介质,或使用子进程
管道来取数据,但这样的结果就是环境不连贯,关键性地方性能受限,换句话,不是因为性能
就只用perl、python好了。所以嵌入还是有其优点的。


鲜花

握手

雷人

路过

鸡蛋
该文章已有0人参与评论

请发表评论

全部评论

专题导读
上一篇:
C语言第六次作业发布时间:2022-07-14
下一篇:
matlab中%d,%f,%c,%s代表什么意思发布时间:2022-07-14
热门推荐
阅读排行榜

扫描微信二维码

查看手机版网站

随时了解更新最新资讯

139-2527-9053

在线客服(服务时间 9:00~18:00)

在线QQ客服
地址:深圳市南山区西丽大学城创智工业园
电邮:jeky_zhao#qq.com
移动电话:139-2527-9053

Powered by 互联科技 X3.4© 2001-2213 极客世界.|Sitemap