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

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

     print "After execute\n";
};