Custom Search

JITAKU_SVR_Wiki

#!/usr/bin/perl

use strict;
use warnings;
use Math::Round;

$vmx = `/bin/ps auwwx | /bin/grep -v grep | /bin/grep $ARGV[0]`;

@cpu = split(/\s+/, $vmx);
print round("$cpu[2]");

TIPS:
Math::Round moduleを利用することで簡単に四捨五入できる。
roundメソッドの引数に四捨五入したい値を入れる。
ここでは、cpu[2]に渡された値が小数点の値なので、これに適応させる。

splitについては

  • split_カラムの取得


トップ   編集 凍結 差分 バックアップ 添付 複製 名前変更 リロード   新規 一覧 単語検索 最終更新   ヘルプ   最終更新のRSS
Last-modified: 2015-12-22 (火) 15:21:17 (670d)