sarコマンドの出力がありますが、時間がPOSIXではありません。
Linux 2.6.32-431.29.2.el6.x86_64 (test.server.com) 2015-08-01 _x86_64_ (32 CPU)
12:00:01 AM CPU %usr %nice %sys %iowait %steal %irq %soft %guest %idle
12:10:01 AM all 0.01 0.00 0.07 0.00 0.00 0.00 0.00 0.00 99.93
12:10:01 AM 0 0.01 0.00 0.02 0.00 0.00 0.00 0.00 0.00 99.97
[…]
私は12:00:01 AMからposix 00:00:01までの時間で始まる行の時間を変える方法を見つけようとしています。
どんなアイデアがありますか?
とても感謝しています!
答え1
個人的に私はそうするでしょう:
- 時間をエポック形式で解析します。
- 目的の出力形式でエポック時間を印刷します。
たとえば、
#!/usr/bin/env perl
use strict;
use warnings;
use Data::Dumper;
use Time::Piece;
while ( <DATA> ) {
my ( $time_str ) = m/^([\d\:]+ [AP]M)/;
print $time_str, "=>",;
my $newtime = Time::Piece -> strptime ( $time_str, "%I:%M:%S %p" );
print $newtime->strftime("%H:%M:%S"),"\n";
}
__DATA__
12:00:01 AM CPU %usr %nice %sys %iowait %steal %irq %soft %guest %idle
12:10:01 AM all 0.01 0.00 0.07 0.00 0.00 0.00 0.00 0.00 99.93
12:10:01 AM 0 0.01 0.00 0.02 0.00 0.00 0.00 0.00 0.00 99.97
したがって、スクリプトは次のようになります。
#!/usr/bin/env perl
use strict;
use warnings;
use Time::Piece;
while (<>) {
if ( my ($time_str) = m/^([\d\:]+ [AP]M)/ ) {
my $new_time_str = Time::Piece->strptime( $time_str, "%I:%M:%S %p" )
->strftime("%H:%M:%S");
s/$time_str/$new_time_str/;
}
print;
}
これは「インライン」として機能します。<>
Perlの魔法を使用すると、次のことが可能です。
./myscript.pl some_file
some_command | ./myscript.pl
次のように線形化することが可能です。
perl -MTime::Piece -pe 's/^([\d\:]+ [AP]M)/Time::Piece->strptime( $1, q{%I:%M:%S %p} )->strftime(q{%H:%M:%S})/e;'
答え2
将来のドキュメントでは、ロケール(おそらくen_USなど)を削除して24時間形式で出力を取得できるため、AM / PMが表示されます。たとえば、
$ LANG=C sar -u 2 5
13:32:30 CPU %user %nice %system %iowait %steal %idle
しかし、
$ LANG=en_US sar -u 2 5
01:32:02 PM CPU %user %nice %system %iowait %steal %idle