このエントリーをはてなブックマークに追加


出力情報に日時情報を付加する方法

Perlを利用すれば出力された情報に対し簡単に日時を追加できます。
例えばiostatやvmstatの出力には日時情報が付加されません。
以下のPerlスクリプトを使えば簡単に付加することが可能です。

本資料は下記URLを参考にし備忘録としてほとんど同様の内容を書かせていただいています。
http://d.hatena.ne.jp/imaiworks/20080326/1206499871


関連資料

日時を付加するPerlスクリプト

下記スクリプトを保存して実行できるようにパーミッションを設定してください。

#!/usr/bin/perl
use strict;
use warnings;
while (defined(my $line = <>)) {
  my ($sec, $min, $hour,$day ,$month ,$year ,$week) = localtime();
  printf('%04d/%02d/%02d %02d:%02d:%02d %s', $year+1900, $month+1, $day, $hour, $min, $sec, $line);
}

使用方法

以下、ホームディレクトリのbinディレクトリにputtime.plというファイル名で保存し実行した例を記します。
下図は、本スクリプトによりvmstatコマンドの出力に日時情報を付加しています。

$ vmstat 2 5 | ~/bin/puttime.pl 

下図の上位部分はvmstatを発行し実行。下位部分は本スクリプトを利用してvmstatを実行。
赤字の部分が日時が追記された結果となります。

puttime-01.png
 

 

添付ファイル: fileputtime.pl 622件 [詳細] fileputtime-01.png 507件 [詳細]

トップ   編集 凍結 差分 バックアップ 添付 複製 名前変更 リロード   新規 一覧 検索 最終更新   ヘルプ   最終更新のRSS
Last-modified: 2015-03-20 (金) 22:27:24