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

Thanks for suggestion. I check it and it did not work, unfortunately. The execution never stops and script runs as before, without throwing any exceptions 
$sth->execute(@arguments);
die "$sth->errstr" if (!$sth); # trap errors
die "No rows updated" if ($sth eq '0E0'); # trap no insert/update

[download]
I am wondering, is there any way to specify which column should be used as a key column containing unique IDs? In the original table, I have 8 columns, in which only values in last 2 are always different, as long as the very first index column I've implemented explicitly. The rest very often could have equal values: 
123    SM_Th2_2_K9me3    SM    Th2    2    K9me3    Tbx21-24    6.98
124    SM_Th2_2_K9me3    SM    Th2    2    K9me3    Tbx21-25    9.31
125    SM_Th2_2_K9me3    SM    Th2    2    K9me3    Tbx21-26    5.12

[download]
Could that be that DB driver just overwriting existing rows when executing INSERT?

Replies are listed 'Best First'.
Re^3: Perl DBI: problems inserting data to a table
by boftx (Deacon) on Nov 21, 2013 at 13:10 UTC

    Try using just what I wrote before: 

    print $sth->errstr unless $sth->execute(@arguments) > 0;

    [download]

    What you posted above doesn't capture the actual return value of the 'execute' call. You might need to say "$dbh->errstr" instead of "$sth->errstr".

    It helps to remember that the primary goal is to drain the swamp even when you are hip-deep in alligators.
[reply]
[d/l]
      I tried initially your string with the same result...
[reply]

        It was my thought that maybe the data in one of the columns exceeded the DB field width, but if that is the case, you are not getting an error message that would show it. At this point I would start losing some hair.

        It helps to remember that the primary goal is to drain the swamp even when you are hip-deep in alligators.
[reply]

In Section Seekers of Perl Wisdom