たまにCapistranoとか使っててawk使いたい時とかにエスケープが難しすぎてイライラすることがある
そんなときにPerlワンライナーでawkの変わりをさせたりするのでメモがてら載せておく
awk
その時によって違うのでなんとも言えないがこんな感じで使う
$ echo -e 'a b c\nd e f' | awk '{print $1 $2}' ab de $ echo -e 'a b c\nd e f' | perl -anle '($first, $second)=@F; print $first . $second;' ab de
sed
わりと簡単にできる
cat a.txt | perl -pe 's/(a|f)/1/g' 1 b c d e 1 g h
まとめ
Perlってべんり