何かしたいときに、自分でプログラムを作らなくても、あるものを組み合せればたいがいのことはできそう。
MacBook Air 買って正解だった。
今日書いたコマンドをとりあえずメモっておく。
echo date > list.1 perl -lane 'print $F[4] if $F[4]' default.log.* | sort | uniq >> list.1 cp list.1 list.2 ls -tr default.log.* | while read LINE; do STEM=`perl -lane 'print $F[0] if 1..1' $LINE` echo $STEM date > cnt_$STEM.txt perl -lane 'print $F[4] if $F[4];' $LINE|sort|uniq -c >> cnt_$STEM.txt; join -a 1 -1 1 -2 2 -o 2.1 list.1 cnt_$STEM.txt > join_$STEM.txt paste list.2 join_$STEM.txt > tmp.1 mv tmp.1 list.2 done perl -ple 's/\s/,/g' list.2 > list.csv
