null?报错

把报错的那部分代码粘出来已经贴出来了，就是11,12,13行，这个脚本我看了下没错，make到16行的时候就停止了。这个脚本是源代码中的脚本<spanstyle="font-family:Consolas,'BitstreamVeraSansMono','CourierNew',Courier,monospace;line-height:14.659090995788574px;background-color:#FFFFFF;">../tools/add_marshalling.pl文件的63行前后贴一下<preclass="brush:perl;toolbar:true;auto-links:false;">6162FILE:for$file(@ARGV){63open(IN,"<$file")ornextFILE;64undef$/;65$=<IN>;66$/="\n";67closeIN;68print"scanning$file\n";6970$done=0;71if(s/#include"([^"]+)"/#include"$1"\n#include<server-marshal.h>\n/s){$done++;}72if(s/adb(\w+)t*axis2_skel(\w+)(\w+)(([^)]+)adb(\w+)t*(\w+)[^}]+TODO[^}]+}/adb$1_taxis2_skel_$2_$3($4adb_$5_t$6)\n{return(${3}Marshal($6,env));}/sg){$done++;}73if(s/adb_(\w+)t*axis2_skel(\w+)(\w+)(constaxutil_env_t*env[^}]+TODO[^}]+}/adb$1_t*axis2_skel_$2_$3(constaxutil_env_t*env)\n{return(${3}Marshal(env));}/sg){$done++;}74if(s//*Anyinitializationstuffofaxis2_.goeshere*//adb_InitService();\n/sg){$done++;}7576if($done)77{7879print"modifying$file\n";80system"cp$file$file~";81open(OUT,">$file")ordie"couldnotoverwrite$file";82printOUT;83closeOUT;84}85}

这是那个脚本的代码