Oracle のアラートログなどに出力されている「ORA-」メッセージをエラー番号別に集計する Perl ワンライナー。
- コマンド
perl -wnle '/(ORA-[0-9]+)/ and print $1;' log*/* | sort | uniq -c
- 実行結果
15 ORA-00001 20 ORA-01400 7 ORA-12899 ...
追記:
- Perl のみで記述してみた。
perl -wnle 'BEGIN{%h=();}/(ORA-[0-9]+)/ and $h{$1}++;END{map{print "$_:$h{$_}"} keys %h;}' log*/*
- 実行結果
ORA-00001:15 ORA-01400:20 ORA-12899:7 ...