2008-09-03 Perlワンライナーで正規表現の文字列抽出 シェルスクリプト Perl .cppファイルを探して行数でソート。 Perlのワンライナーで行数を抜き出す。 find . -name "*\.cpp" -exec wc -l {} \; | perl -ne 's/ .*//; print' | sort -gr cutコマンドでもいける find . -name "*\.cpp" -exec wc -l {} \; | cut -d " " -f 1 | sort -gr