ablog

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

コード対応表から Perl ワンライナーでファイル対応表を生成してそれらのファイル diff をとってみた

perl -F, -lane '$F[4]=~s/(^"|"$)//g;print qq/ro\/CD000001$F[0]201003.dat rs\/201003_$F[4].dat/' list.csv|while read LINE;do diff -q $LINE;done