my @cols = map {ref($_)?$_->[0]:$_} @{$param{columns}};
my %cols_types;
@cols_types{@keys,@cols} = map {ref($_)?($_->[0].'::'.$_->[1]):$_} @{$param{keys}},@{$param{columns}};
- my $cols = join(',',@keys,@cols);
- my $cols_types = join(',',map{$cols_types{$_}} @cols);
- my $placeholders = join(',',('?') x (@cols + @keys));
+ my $cols = join(', ',@keys,@cols);
+ my $cols_types = join(', ',map{$cols_types{$_}} @keys, @cols);
+ my $placeholders = join(', ',('?') x (@cols + @keys));
my $set = join(",\n",map {qq($_ = new_values.$cols_types{$_})} @cols);
my $where_up = join(' AND ',map {qq(up.$cols_types{$_} = new_values.$cols_types{$_})} @keys);
my $where_set = join(' AND ',map {qq(t.$cols_types{$_} = new_values.$cols_types{$_})} @keys);