+ -
当前位置:首页 → 问答吧 → reload配置文件问题

reload配置文件问题

时间:2010-08-23

来源:互联网

我想这样,程序读入多个配置文件,但配置文件改变时,reload配置文件,每个配置文件都tie一个hash的,请问一下,有没有好的方法,就是不if或者正则匹配的情况下,自动tie到相应的变量~~
例如:
  1. sub load_config
  2. {
  3.         my $file = shift;
  4.         tie my %ini, 'Config::IniFiles', ( -file => $file );
  5.         return shared_clone(\%ini);       
  6. }
复制代码
上面这个是load配置文件的,假设程序有3个配置文件,
  1. our ($cfg1,$cfg2,$cfg3);
  2. $cfg1 = load_config($file1);
  3. $cfg2 = load_config($file2);
  4. $cfg3 = load_config($file)3;
复制代码
  1. sub file_change_watcher
  2. {
  3.     while(1){
  4.        if (is_change($file))
  5.       {
  6.           $which = load_config($file);#which怎样才能根据那个文件的改变,自动赋给相应的全局变量$cfg
  7.       }
  8.      sleep 1;
  9.    }
  10. }
复制代码

作者: wfnh   发布时间: 2010-08-23

回复 wfnh


    一个国人写的模块:
http://search.cpan.org/~pangj/Co ... /Config/Autoload.pm

作者: 兰花仙子   发布时间: 2010-08-23

热门下载

更多