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参数是否设置为/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

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

Answer 3

来自Config::IniFiles documentation：

-file filename

指定要从中加载参数的文件。这个'文件'实际上可能可以是以下任何一项：

文件的路径名

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

一个简单的文件句柄

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

文件句柄

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

对glob

的引用

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

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 );

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

$ini_file_contents = <<EOT
[section name]
Parameter=A value
Setting=Another value
EOT

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

使用 - 在perl中的函数参数中

3 个答案: