配列から効率良くプレースホルダを作る : にぽたん研究所

my @a = qw(foo bar baz); こんな配列から ?,?,? という文字列を使いたい場合があります。 例えば、 SELECT * FROM hoge WHERE user_id IN (?,?,?); みたいな SQL にする場合のプレースホルダを作ると言った具合に。 社内 IRC で、clouder さんが言い出して、 18:27 <clouder>join(',', map('?', @a)) 18:27 <clouder> こんなのしか思いつかない。。 と言う。 まぁ、それが妥当というか、普通それが思い浮かぶよなーって思ってたら、会社の dos さんという人が 19:15 <dos> '?,' x @a; で s/,$//; というｿﾘｭｰｼｮﾝ とか、異様なことを言い出した。 sub placeholder_from_array { return join(',',

[kiyo_hiko]

どっちもあんまし違和感ない

[mogwaing]

where clauseのinに配列を渡す場合のプレースホルダを作る方法

[bsheep]

http://www.rfs.jp/sb/perl/dbi/02.html

[send]

黒魔術に進みたくなる感じ

[another]

よりobfuscatedな解: 「return @_?"?".",?"x$#_:"";」。

[kits]

chop より substr

[cheebow]

おもしろー。こういうのってパズルみたい

[fbis]

僕の場合「join ',' , ('?') x @a」を良く使ってるなぁ。

[otsune]

うわっ。Perlの暗黒面（可読性無視）に踏み込みがちなネタかも

[koemu]

ループ回数が多い場合は重要