}else{ my $values = join(',',reverse(@values)); chomp $values; #print "$values\n"; $insert00->execute("$values"); } #### } else { $insert00->execute(@values); }