Perl 超级奇怪问题，期待神人帮忙 perl调用unix系统命令 ，遇到输出不全，或者为空

bt810506

哪位高手能给点意见， 我也是编写perl三年多了，但是最近遇到的问题的确是没辙。。。

主要是perl调用unix系统命令 ，遇到输出不全，或者为空。。 可能执行100次，才出现1次这样的情况。（遇到问题，纪录trace发现的）

AIX 平台ps 命令:
if ($^O eq "solaris"
{
   $ps_cmd = "/bin/ksh -c ' export COLUMNS=2048 ; /bin/ps -e -o user,pid,etime,pcpu,vsz,args'";
   $ps_ucb_cmd = "/bin/ksh -c ' export COLUMNS=2048 ; /usr/ucb/ps -axww'";
   $ps_zone_cmd = "/bin/ksh -c ' export COLUMNS=2048 ; /bin/ps -efo  zone,pid'";
}
elsif ($^O eq "linux"
     {
      $ps_cmd = "export COLUMNS=2048 ; /bin/ps -e -o user,pid,etime,pcpu,vsz,args";
     }
   elsif ($^O eq "hpux"
       {
        $ps_cmd = "export UNIX95=yes; export COLUMNS=300 ; /bin/ps -ex -o user,pid,etime,pcpu,vsz,args";
       }            
      else
        {
         $ps_cmd = "/usr/bin/ksh -c 'export COLUMNS=200 ; /bin/ps -e -o user,pid,etime,pcpu,vsz,args'";  # 这里是AIX 最终调用
        }

  open(CMD,"$ps_cmd|" or die ("Cannot execute ps command";

通过CMS，我打印输出，经常结果不全，或者为空






我认为我的代码语法没有问题，  而且该问题，发生概率1% ，而且并不是在所有AIX都发生这个问题。  问题机器的发生频率为1%都没有。。。。（内存，cpu使用都很低）


期待神人帮忙，
                               如果在上海，我请你吃饭也成。。      
我的MSN：baitao2020@163.com

bt810506

我是楼主~

另外我想说一下，我认为不是语法的问题，我怀疑是否是perl 本身的bug,或者系统的bug...

以前HPUX 查询volue 也遇到类似问题,最后只能代码sleep n ,多次查询屏蔽

flw

明明就是 CPU 的 BUG。甚至有可能是你的机房供电不足引起的。
你给你的设备配备 UPS 了吗？哪个型号的？

hitsubunnu

bt810506

原帖由 flw 于 2009-4-20 17:44 发表
明明就是 CPU 的 BUG。甚至有可能是你的机房供电不足引起的。
你给你的设备配备 UPS 了吗？哪个型号的？

听说是国家银行的服务器，我想应该有UPS ,不知道为什么说是CPU的bug， 机型我不清楚，估计是比较高端的吧~~

MMMIX

原帖由 bt810506 于 2009-4-20 18:34 发表



听说是国家银行的服务器，我想应该有UPS ,不知道为什么说是CPU的bug， 机型我不清楚，估计是比较高端的吧~~

It's a joke.

cobrawgl

你调试一下嘛，没有你的环境，这怎么帮你

bt810506

我是楼主，多谢大家回复。。

这个问题，出现的概率是1% ，机器我登陆不了，是别人在客户那里反馈的问题。。。。 如果有人想要脚本（比较大，多个文件交互，就不贴了），可以加我MSN:baitao2020@163.com ，
代码不存在语法，逻辑问题。。

我怀疑是系统问题， 所以我现在只能祈祷有人遇到类似的问题，能够给我一个解决方法~~~~


神人阿，你快出现吧~~~~

MMMIX

原帖由 bt810506 于 2009-4-21 12:24 发表
代码不存在语法，逻辑问题。。

这话的意思往往都是 代码存在语法/逻辑问题，但我不知道在什么地方。。。