- 在函数参数的perl

Question

我有以下

use Config::IniFiles; 
my $cfg = new Config::IniFiles(-file => "/path/configfile.ini"); 
print "The value is " . $cfg->val('Section', 'Parameter') . "." 
if $cfg->val('Section', 'Parameter'); 

尽管上述使得几乎所有的意义上，我不是肯定的什么-file是表示

my $cfg = new Config::IniFiles(-file => "/path/configfile.ini"); 

就是上面说的$file PARAM在函数中设置为/path/configfile.ini？抑或是别的东西

Answer 1

在该上下文中是-file一个普通的字符串，即表达式可以写成

my $cfg = Config::IniFiles->new("-file" => "/path/configfile.ini"); 

的=>操作导致在其左侧被解释为一个字符串的话，所以你不必引用它。

Answer 2

我用现代风格的OOP你的建议：

my $cfg = Config::IniFiles->new(-file => "/path/configfile.ini"); 

请检查该模块在CPAN来源：Config::IniFiles

后-file =>“/path/configfile.ini “，它保存到参数$self->{cf} = $v，然后ReadConfig。

Answer 3

从Config::IniFiles documentation：

-file文件名

指定该文件以从加载的参数。该 '文件' 实际上可能 是下列任何东西：

1. 文件

   $cfg = Config::IniFiles->new(-file => "/path/to/config_file.ini"); 
   

2. 一个简单的文件句柄的路径名

   $cfg = Config::IniFiles->new(-file => STDIN); 
   

3. 文件句柄glob

   open(CONFIG, "/path/to/config_file.ini"); 
   $cfg = Config::IniFiles->new(-file => *CONFIG); 
   

4. 到水珠

   open(CONFIG, "/path/to/config_file.ini"); 
   $cfg = Config::IniFiles->new(-file => \*CONFIG); 
   

5. IO::File一个对象的引用

   $io = IO::File->new("/path/to/config_file.ini"); 
   $cfg = Config::IniFiles->new(-file => $io); 
   

   或

   open my $fh, '<', "/path/to/config_file.ini" or die $!; 
   $cfg = Config::IniFiles->new(-file => $fh); 
   

6. 的引用标量（需要的IO::Scalar较新版本）

   $ini_file_contents = <<EOT 
   [section name] 
   Parameter=A value 
   Setting=Another value 
   EOT 
   
   $cfg = Config::IniFiles->new(-file => \$ini_file_contents);