在 perl 中读取点符号 (.)答案

【问题标题】：Reading a dot symbol (.) in perl在 perl 中读取点符号 (.)
【发布时间】：2014-03-30 06:42:08
【问题描述】：

我有一个如下所示的 .conf 文件：

[offline_online_status]
offline_online_status.offline_online_state=ONLINE

perl如何读取上面值中的点符号（.）？谁能教教我？

【问题讨论】：

“读取点符号”是什么意思？
@RedCricket 如果您可以看到该字符串中的状态和离线之间有一个点。我想把这个字符串写入另一个文件，但我似乎也无法检索点符号。我只会得到没有点符号的“offline_online_statusoffline_online_state=ONLINE”。
从 Perl 的角度来看，点字符绝对没有什么特别之处。请显示一些代码。
@Sean 你可以在这个链接中看到我的代码stackoverflow.com/questions/22003079/…
有很多代码需要浏览。将其简化为演示问题的最小程序，并将其放在这里，而不是放在那里。

标签： perl cgi symbols

【解决方案1】：

也许您可以根据自己的需要进行调整：

$ cat ./test.pl
#!/usr/bin/perl

while(<DATA>) {
        next if /\[online_offline_status]/;
        my @arr = split /\./;
        print "." . $arr[1];
}

__DATA__
[online_offline_status]
online_offline_status.online_offline_state = ONLINE
$ ./test.pl
.online_offline_state = ONLINE

【讨论】：

【解决方案2】：

尝试使用这个，进行自己的修改：

use CGI;
use Config::Tiny;
use Data::Dumper;
use CGI::Carp qw(fatalsToBrowser);

#location/directory of configuration file
my $file = "your configuration file path";
my $Config = Config::Tiny->read($file);

#reads the section, key and the value of the configuration file.
my $status_in_file = $Config->{"offline_online_status"}->{"offline_online_status.offline_online_state"};

然后打印 $status_in_file。此代码将读取配置文件中的整个键和值。

【讨论】：