eval { for(@stmts) { my $sth = $dbh->prepare($_); $sth->execute; } };