perl如何读取ini文件

risepp

在shell中要读取ini，直接通过. ./FILENAME就可以了
perl有没有什么比较方便的方式或者module中的预定义函数可以用来读取ini啊？
难道只有通过分析ini将=前的内容和变量名称比较再去后面的值来读取ini麽？
请高手指教，谢谢！

liang573728

用Config::IniFiles

risepp

哦，好的，我去找找看，谢谢帮忙。

stoneson

1. 
   
2. #!/usr/bin/perl
   
3. use strict;
   
4. use warnings;
   
5. 
   
6. use Config::IniFiles;
   
7. my $cfg = new Config::IniFiles( -file => "./config.ini" );
   
8. print "The value is " . $cfg->val( 'Section', 'Parameter' ) . "." if $cfg->val( 'Section', 'Parameter' );
   

复制代码

============config.ini===============
  [Section]
  Parameter=this parameter a few lines1
  Parameter=this parameter a few lines2 #gfdgadfga
============end config.ini============

risepp

非常感谢。
：）