はじめてのにき

_ 短い答えはいまいち書けなかった

http://www.atdot.net/~ko1/diary/200809.html#d27

o = [1, 3, 4, 5, 6, 12, 13, 15]

$_=o*','
o.map{|v|sub(/#{v-1}(.)?,(#{v})|.*\d$/){$1?$2+$1:"[#$&]"}}
p eval$_

要はこの問題、何がイヤって 長くなるとかうんぬんより条件式が多くなりまくるのが ウザいということであり、ささださんのは2つしか無いので優秀。

で、その意味で僕のコードは 一つしか無いので素晴らしいと主張したいのである。

(05:53)

_ あ

o.map{|v|sub(/.*\d$|#{v-1}(.)?,(#{v})\b/){$1?$2+$1:"[#$&]"}}

とかじゃないとだめか。左っかはの \b は無くていい気が するが自信なす

(05:58)