小编Spa*_*ace的帖子

我有不同的站点在每个位置运行4到5台服务器.所有位置都有一个带Nagios的监控服务器.现在我想创建一个中心位置,并希望结合在每个位置运行的所有nagios服务.谁能指点我这些类型的工作的一些文件.

我是新手,需要了解如何完成这项任务.我有一个包含以下示例数据的csv文件:

site,type,2009-01-01,2009-01-02,....
X,A,12,10,...
X,B,10,23,...
Y,A,20,33,...
Y,B,3,12,...

and so on....

我想创建一个perl脚本来从csv文件中读取数据(根据给定的用户输入)并创建XY(散点)图表.假设我想为日期2009-01-01创建一个图表并输入B.用户应该输入类似"2009-01-01 B"的内容,并且应该使用CSV文件中的值创建图表.

任何人都可以建议我一些代码开始？

我正在创建一个网站,并完成了一些HTML的东西,但我想用CGI和Perl脚本创建网站.我对CGI脚本没有太多了解.任何人都可以建议我如何创建一个CGI脚本以及如何使用它创建网页？

我仍然在学习Perl脚本,并且在完成以下任务时需要帮助.

Sample data:


INV ,GOOD"
2405
INV ,BAD"
42
LOAD ,GOOD"
35588
LOAD ,BAD"
675
TRNS ,GOOD"
6
TRNS ,BAD"
122

我想在GOOD和BAD下添加值.

GOOD, <sum of all good values>
BAD, <sum of all bad values>

任何人都可以建议我读取第一行的代码,并将下一行的值放在一个数组中,以便添加后者.

我还在学习Perl.任何人都可以建议我使用Perl代码比较.tar.gz文件和目录路径.

假设我有tar.gz备份以下目录路径,这是我几天前回来的.

a/file1
a/file2
a/file3
a/b/file4
a/b/file5
a/c/file5
a/b/d/file and so on..

现在我想将此路径下的文件和目录与tar.gz备份文件进行比较.

请建议使用Perl代码.

我有一个像下面的数组数组与所有数值.我想用这些值执行一些数学运算.

1)添加并打印每个数组元素的值.例如

sum $VAR1 = sum1
sum $VAR2 = sum2

2)添加每个变量的所有值.例如

sum $VAR1 + $VAR2 +...+ $VARn = totalsum

3)寻找每个变量的总(的百分比sum1,sum2等)与totalsum.

$VAR1 = [
          '17071',
          '16120',
          '16292',
    'upto n numbers'
        ];
$VAR2 = [
          '1306',
          '1399',
          '1420',
    'upto n numbers'
        ];  
.
.
.
$VARn = [
          '1835',
          '1946',
    'upto n numbers'
        ];  

我已尝试下面的代码来执行第一个数组ref的添加,但它没有给我正确的值.

my $total = 0;
($total+=$_) for $input[0];
print $total;

我已经安装了DBD :: Pg版本2.17.1,但在使用下面的代码时仍然会出错

$res = $conn->prepare($query);
$res = $res->execute();
@tuple = $res->fetchrow_array;

错误:

Can't call method "fetchrow_array" without a package or object reference at test.pl line 69.

请建议.

任何人都可以建议我下面Perl正则表达式的含义:

$_ =~ s/^([^,]+,)ab.([^,]+,)(?:[^,]+,)/$1$2/;

什么是角色$1和$2如何定义这些变量？

我正在做一些我需要获取一些信息的东西kstat -p.所以我想创建一个包含所有输出的哈希变量kstat -p.

Sample output from kstat -p

cpu_stat:0:cpu_stat0:user       18804249

访问值

@{$kstat->{cpu_stat}{0}{cpu_stat0}}{qw(user)};

我也查看过任何可用模块的CPAN,Sun::Solaris::Kstat但是我的Sun版本不提供.请建议使用输出值创建哈希变量的代码kstat -p.

我编写了一个Perl脚本来读取配置文件并创建CGI脚本.这工作正常,我在终端上获得CGI脚本的输出,我可以在网页上执行CGI脚本.下面是我的示例脚本.

#!/usr/bin/perl -w

use strict;
use Text::Template;

my $conf = "test.cfg";

open CFG, $conf or die "Could not open config file";
my @rawConfig = <CFG>;
my $config = eval "{".join("",@rawConfig)."}";

my $template = Text::Template->new(TYPE => 'FILE',  SOURCE => 'test.cgi.tmpl');
my $result = $template->fill_in(HASH => $config);
print $result;

通过使用这个我必须保存每个CGI并单独执行.我需要帮助来修改此代码,以便我可以直接在Web上执行此脚本并在网页上显示输出.

相关/可能重复:如何在Perl中验证日期？

我创建了一个脚本,用户在执行脚本时需要提供开始和结束日期.用户输入的日期格式应YYYY-MM-DD仅为格式.

start_date = $ARGV[0];
end_date = $ARGV[1];

请指教.

我正在使用DBI编写脚本来执行对Oracle数据库的选择查询.我已成功捕获数据但我需要帮助才能更改输出.

以下是示例输出.

Type
2
6

我想显示2 =>好,6 =>坏

任何人都可以建议我映射输出的Perl代码？