ablog

不器用で落着きのない技術者のメモ

「ORA-」メッセージをエラー番号別に集計する Perl ワンライナー

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
  ...