perl的资源释放问题

lichmama

sub mysub {
  if(open(PIPE, "vmstat 1 1|")){
   #do-something here
   close(PIPE);
  }
  #also-do-something here
}

大家好，如上述代码，我在do-something的时候有可能会选择return退出sub，因此会导致没有close(PIPE)。想问下此行为会有什么不良影响么？perl会自动回收掉打开的PIPE么？注：该子程序将会在很长一段时间内被重复调用。

thy_shenzhen

会有影响，linux系统级有两个参数，限制了打开文件大小，一个是针对进程的，默认最多打开1024个；
另外一个针对总体的。

这两个都是高并发必须调优的参数。

lichmama

回复 2# thy_shenzhen


    谢谢，那我就改下逻辑结构，确保close。

billypeng

调用次数多了，就有影响。