my $fields = join(', ', @dbfields); my $places = join(', ', ('?') x @dbfields); my $insertrow = "INSERT into $table_webreporting ($fields) values ($places)"; $insertrow = $dbhc->prepare($insertrow); #### foreach my $temp (@dbfields) { $sqlinsert{$temp} = undef unless ($sqlinsert{$temp}); }