从实用角度出发，并未付诸于解释（有时间后期补充）。程序内容直接复制到文件，即可使用。

注意perl调用python路径在相同目录下；

python调用perl则不需要

系统环境：windows7

python版本：2.x

perl版本：This is perl 5, version 24, subversion 2 (v5.24.2) built for MSWin32-x86-multi-thread-64int

编辑器：notepad++

notepad++配置python和perl运行环境方法：

http://blog.csdn.net/sunyan3517/article/details/74857499

perl调用python
 use File::Spec;
 *******perl代码*****perl_test.pl*********
 sub PerlCallPython
     my $path_curf = File::Spec->rel2abs(__FILE__);
     print "C PATH = ",$path_curf,"\n";
     my ($vol, $dirs, $file) = File::Spec->splitpath($path_curf);
     print "C Dir = ", $dirs,"\n";
     my $count = 1;#可以是任意字符串
     chdir $dirs;#saveComment_temp.py 程序所在位置
     system("python python_t.py -n $count");
 chdir $dirs;#saveComment_temp.py 程序所在位置
 PerlCallPython();
 ******python文件内需要的程序***python_t.py*******
 #coding:utf-8
 import argparse
 parser = argparse.ArgumentParser()  #建立parser
 parser.add_argument('-n')  #接受n存入
 args = parser.parse_args()  #得到所有参数
 #获得的内容： Namespace(n='1')
 #注意不是字符串 而是一个类，所以需要str()转换
 path_temp = args;
 print args;
 ========================================================================
 ========================================================================
 ========================================================================
 python 调用 perl
 python代码
     #coding:utf-8
     import subprocess
     arg1 = "10";
     arg2 = "20";
     #无参数调用方法
     #subprocess.call(["perl", "XXXXX\\XXXXXX\\perl_t.pl"]) #注意路径
     #subprocess.call接受字符串参数，所以arg1 = "10";
     #有参数调用方法
     subprocess.call(["perl", "XXXXX\\XXXXXX\\\perl_t.pl", arg1, arg2]) #注意路径
 perl代码
 print "call perl\n";
 sub fun0
     my $fun0_t0 = $ARGV[0];
     my $fun0_t1 = $ARGV[1];