You may also want to verify that the "HERE" is actually coming from the execute, by printing a marker before and after:

eval {
     print "Before prepare\n";
     my $sth = $dbh->prepare($sql);

     print "Before execute\n";
     $sth->execute( @values );

     print "After execute\n";
};
[download]