0

メトリック ポートを解析し、メトリック名と値をハッシュに出力し、ハッシュを読み取り、メトリック名と値を gmetric に渡すスクリプトを作成しています。ただし、同じプロセスの複数のインスタンスが実行されているため、ハッシュの 1 つのフィールドに重複した名前があります。

[MacOSX_Leopard,2
 Win32_Windows,5
 MacOSX,2
 Win32_Windows,5]

私がやりたいことは、これらの値を照合して、関連する各メトリックの 1 つの合計に合計できるようにすることです。perlでこれを行う最良の方法/方法は何ですか?

4

1 に答える 1

0

私があなたを正しく理解していれば、これがあなたの意図していることです：

#!/usr/bin/perl

$value{"MacOSX_Leopard"} += 5;
$value{"MacOSX_Leopard"} += 3;
$value{"MacOSX"} += 3;
$value{"Windows"} += 2;

foreach $key (keys %value) {
   print "$key\t",$value{$key},"\n";
}

結果：

MacOSX  3
Windows 2
MacOSX_Leopard  8
于 2013-08-02T20:23:46.143 に答える