diff --git a/SQLite.xs b/SQLite.xs
index 2f8dba1..ffae61d 100644
--- a/SQLite.xs
+++ b/SQLite.xs
@@ -63,21 +63,6 @@ busy_timeout(dbh, timeout=0)
   OUTPUT:
     RETVAL
 
-void
-_do(dbh, statement)
-    SV * dbh
-    char * statement
-    CODE:
-    {
-        D_imp_dbh(dbh);
-        IV retval;
-        retval = sqlite_db_do(dbh, imp_dbh, statement);
-        if (retval == 0)
-            XST_mPV(0, "0E0"); /* (true but zero) */
-        else
-            XST_mUNDEF(0); /* <= -2 means error */
-    }
-
 MODULE = DBD::SQLite          PACKAGE = DBD::SQLite::st
 
 PROTOTYPES: DISABLE
diff --git a/dbdimp.c b/dbdimp.c
index 0c4c05d..043ec08 100644
--- a/dbdimp.c
+++ b/dbdimp.c
@@ -230,25 +230,6 @@ sqlite_db_commit(SV *dbh, imp_dbh_t *imp_dbh)
     return TRUE;
 }
 
-int
-sqlite_db_do(SV *dbh, imp_dbh_t *imp_dbh, char *statement)
-{
-    dTHR;
-    int retval;
-    char *errmsg;
-
-    sqlite_trace(2, "DO");
-    if ((retval = sqlite3_exec(imp_dbh->db, statement,
-        NULL, NULL, &errmsg))
-        != SQLITE_OK)
-    {
-        sqlite_error(dbh, (imp_xxh_t*)imp_dbh, retval, errmsg);
-        return -2;
-    }
-
-    return 0;
-}
-
 int
 sqlite_discon_all(SV *drh, imp_drh_t *imp_drh)
 {
diff --git a/lib/DBD/SQLite.pm b/lib/DBD/SQLite.pm
index 5bca094..c7fdeb9 100644
--- a/lib/DBD/SQLite.pm
+++ b/lib/DBD/SQLite.pm
@@ -62,15 +62,6 @@ sub connect {
 
 package DBD::SQLite::db;
 
-sub do {
-    my ($dbh, $statement, $attr, @params) = @_;
-    return DBD::SQLite::db::_do($dbh, $statement) unless defined $attr && @params;
-    my $sth = $dbh->prepare($statement, $attr) or return undef;
-    $sth->execute(@params) or return undef;
-    my $rows = $sth->rows;
-    ($rows == 0) ? "0E0" : $rows;
-}
-
 sub prepare {
     my ($dbh, $statement, @attribs) = @_;