入力行に時刻を付けて吐き出すフィルタ

_ [システム運用][Perl] 入力行に時刻を付けて吐き出すフィルタ 特定のサーバに ping 打ちっ放しとか、vmstat しっぱなしということが良くあるわけですが、いずれも各行に現在時刻を付けてくれないので後でログを確認する時になかなか不自由です。 で、そういう不便なコマンドの出力結果にタイムスタンプを付加するフィルタスクリプト↓ #!/usr/bin/env perl use strict; use warnings; use POSIX; $| = 1; while (defined(my $line = <>)) { print strftime("%F %T ", localtime), $line; } を puttime.pl とかいう名前でパスの通った場所に置いて、各コマンドの出力結果を渡してやるとｳﾏｰらしいです。 例えば ping -i 1 www.yahoo.co

[kits]

oneliner もあり。 perl -MPOSIX -ne 'print strftime("%Y-%m-%d %H:%M:%S ", localtime), $_'

[pmakino]

セルクマ。

[egyo2nd]

なにかの役に立ちそう

[shidho]

なるほどー。

[ma_ko]

かけっぱなしで帰る時に使えるかも

[Chaborin]

便利便利