请问一个perl cgi的问题

judite

apache2 on windows
问题是命令行下执行的很好，可放到cgi-bin下无输出，猜想是apache的权限问题，google了很久都没头绪，请教大家
s.cgi：

1. 
   
2. print "Content-type: text/plain; charset=utf-8\n\n" ;
   
3. 
   
4. open(RD , "w.cmd 192.168.1.100 e username passwd |") || die("error") ;
   
5. my $gt ;
   
6. while(my $ine = <RD>){
   
7.   #print "line = " . $line ;
   
8.   if($line =~ m/xxx/){
   
9.     .
   
10.     .
    
11.     .
    
12.   }
    
13. }
    
14. close RD ;
    
15. print $gt ;
    

复制代码

w.cmd：

1. 
   
2. @net use \\%1\ipc$ /user:%3 "%4"
   
3. @dir /tw /l /4 \\%1\%2$\
   
4. @net use \\%1\ipc$ /delete
   

复制代码

兰花仙子

程序里写明了perl解析器的路径了么？apache能找到这个路径么？
多看看error_log的信息。

xiaoyu9805119

查看下apache里的error_log把。
win下应该不是权限问题。

judite

回二楼：路径写的，脚本肯定没问题
回二楼三楼：errlog里看不出什么-_-!!
我还是觉得是权限问题
我不清楚apache在win下是以什么用户运行的，httpd.conf里写的是daemon，daemon
系统用户里也没增加什么用户，想来可能是everyone用户
浏览器中运行的时候很长时间，看起来好像是timeout了，命令行下运行速度很快的
我再想想办法
假如有人有更好的idea，也请赐教
谢谢

judite

暂时的解决方案是cmd用task schedule来运行，输出定向到某个文件 perl中读取该文件
还有一种是把该功能写成一个module

ynchnluiti

原帖由 judite 于 2009-1-16 23:57 发表
暂时的解决方案是cmd用task schedule来运行，输出定向到某个文件 perl中读取该文件
还有一种是把该功能写成一个module

试过写成模块吗？

judite

原帖由 ynchnluiti 于 2009-1-17 16:27 发表

试过写成模块吗？

没空写也不会写

ynchnluiti

原帖由 judite 于 2009-1-19 19:35 发表

没空写也不会写

那等有空了学者写吧

judite

忙死了
对了借问下楼上的
perl当中有没有模块能实现像net use \\ip\ipc$ /user:uname "pswd"这样子的功能么？
我在cpan
上翻了好几十页也没找到

ynchnluiti

原帖由 judite 于 2009-1-19 21:04 发表
忙死了
对了借问下楼上的
perl当中有没有模块能实现像net use \\ip\ipc$ /user:uname "pswd"这样子的功能么？
我在cpan
上翻了好几十页也没找到

我也没用过，有时间找找看