- 507 名前：デフォルトの名無しさん [2008/11/18(火) 20:14:56 ]
- 長文すみません
以下のjavaを
// 平均パケット到着レートの算出＆ヒストグラム構成
if (preTimeList.size() >= pktNumForCalcRateAverage) {
sampleAveRate = pktNumForCalcRateAverage / (nowTime - preTimeList.remove(0));
int point = (int)(sampleAveRate / gap);
histgram[point] += 1;
total += sampleAveRate;
lineNum += 1;
}
をperlに書き変えたいのですが
# 平均パケット到着レートの算出＆ヒストグラム構成
if ($preTimeList.size() >= $pktNumForCalcRateAverage) {
$sampleAveRate = $pktNumForCalcRateAverage / ($nowTime - $preTimeList.remove(0));
$point = ($sampleAveRate / $gap);
$histgram[$point] += 1;
$total += $sampleAveRate;
$lineNum += 1;
}
ではエラーが出てしまいうまくいきません。
nowTimeが間違っているのでしょうか？
どなたかアドバイスお願いします。
|
 |
