テキストエディタ総合（part6）

テキストエディタ総合（part6） at MAC

32:訂正
06/10/10 02:46:28 7iQBprVO0
>>31
>郵便番号から半角カナ文字列までの切り出し。改行しないのでターミナルが暫く固まる場合があります。
>perl -pe "s/^([^,]+,[^,]+,[^,]+,[^,]+,[^,]+,[^,]+,)([^,]+,[^,]+,[^,]+,[^,]+,[^,]+,[^,]+,[^,]+,[^,]+,[^,]+)$/¥1/; print '¥n'" <KEN_ALL.CSV
よけいなprint文が入っていました。訂正します。
perl -pe "s/^([^,]+,[^,]+,[^,]+,[^,]+,[^,]+,[^,]+,)([^,]+,[^,]+,[^,]+,[^,]+,[^,]+,[^,]+,[^,]+,[^,]+,[^,]+)$/¥1/;"　<KEN_ALL.CSV

次ページ

続きを表示

1を表示