動的に変数を生成しようと思ったが。

Perlで動的に変数を生成してやろうと思ったんだが、
結局うまくいかずにベタ書きした。

update hoge_tbl
set
〜〜ここをループさせたい
column1 = ${$palam}
column2 = ${$palam}
column3 = ${$palam}
〜〜ここまでをループさせたい
;

で、setのところをループにして、
columnの数字と、$palamの変数名を生成して、
SQLを作ろうと思ったんだがダメだった。

ま、今度また挑戦してみよう。