2010-12-02 要素数を指定して、配列を作成 perl 「x」演算子を使用して、↓こう書きます。 my @list = ('?') x 10; 私の場合、↓こんな感じで、sqlの引数指定に使用しています my @args = ('?') x $csv->fields(); my $args_str = join(',',@args); my $sql =<<EOF; insert into $tbl_name values ($args_str) EOF