in reply to Re: Perl DBI: problems inserting data to a table
in thread Perl DBI: problems inserting data to a table

Yes, all rows are complete. To check RegExp, I was printing each new line and after parsing the data to the DB directly was quering for a new entry using unique ID (index). To check each parsed line I use the following code:
# Display RexExp results print STDERR join("\t",@arguments),"\n"; <here add all data from @argumens to a DB (as described in the origina +l post)> # check if data parsed successfully my $sql2 = 'SELECT * FROM hist_mod_score WHERE Counts=?'; $sth = $dbh->prepare($sql2) or die $dbh->errstr; $sth->execute($index) or die $sth->errstr; # dump fetched query results $sth->dump_results if $sth->{NUM_OF_FIELDS};
In the output I've got the following:
0 SM_Th2_1_K27ac SM Th2 1 K27ac Tbx21-1 4.8878613 +2768108e-10 0 rows 1 SM_Th2_1_K27ac SM Th2 1 K27ac Tbx21-2 3.8016699 +2152973e-10 0 rows ... 120 SM_Th2_2_K9me3 SM Th2 2 K9me3 Tbx21-21 4.1899 +3008961981e-10 '120', 'SM_Th2_2_K9me3', 'SM', 'Th2', '2', 'K9me3', 'Tbx21-21', '4.189 +93008961981e-10' 1 rows