小问题

ynchnluiti

你这个while(1) {} 是干什么的

Mr-Summer

1那为啥不再循环外定义 my @host=();
2 m＃＃

ynchnluiti

回复  ynchnluiti
一死循环，就是要每1分钟检测一下lvs的列表，然后把列表中的主机存入到host数组中
heqidz 发表于 2010-07-20 16:01

   死循环外面的print无法执行

smilefoxzhu

回复 7# heqidz


会出什么问题啊？
看起来你那个是一个死循环，一直运行的不退出的，那么如果在外部访问，那可能有点类似并发了，可能是这个引起的吧
如果你把定义拿到外边来，顺序访问，应该没问题的吧

smilefoxzhu

回复 18# heqidz


    use strict;
use warnings;

my @host = ();

while (1) {
      @host = ();
      open( IFCONFIG,"ifconfig|" ) || die "$!\n";
      foreach ( <IFCONFIG> ) {
               chomp;
               next unless ( m#(\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3})  );
               print "$1\n";
               push( @host,$1 );
      }
      close IFCONFIG;
print @host,"\n";
sleep 60;
}

这样不可以么

smilefoxzhu

回复 29# heqidz


    不会吧，每次循环清过数组了，不会有重复的啊？是什么不对呢
我这边也没有你的环境，不了解具体的情况，随便说说咯