シンクグラフィカ札幌

テクニカルノート

perlでgrep使ってカテゴリなどを抽出する時のwhile

2007-03-10 14:33:59

よく使う方法か、これが正しいのかどうかはわかりませんが私はよくやります。

CSVファイルなどのテキストベースのデータファイルを使う際に特定フィールドをカテゴリとして認識させるとき、grepを使って重複している項目を省くというナニです。Shift_jisではうまくいきませんがUTF-8ではうまくいきます。
while(@category > 0){[cr]\t@temp = split(/\,/,$category[0]);[cr]\t@category = grep(!/$temp[0]/,@category);[cr]}

perlで無理やりファイルの所有権を変える CGIから書き出したUTF-8のコードを認識しないサーバ
新規コメント出力エリア

エラーメッセージ出力