最近マジでPerlに魅力を感じなくなってきたよ

最近マジでPerlに魅力を感じなくなってきたよ (320ﾚｽ)
上下前次1-新
抽出解除ﾚｽ栞

60(3): 03/01/12 00:47 ID:??? AAS
$line = join ',', map {(s/"/""/g or /[\r\n,]/) ? qq("$_") : $_} @values;
こんなのがPrelの綺麗なコード。

198(3): 03/05/31 23:38 ID:??? AAS
そりゃ、おまえだろ？