--- DBI-1.46/DBI.pm~	2004-11-16 12:23:38 +0000
+++ DBI-1.46/DBI.pm	2004-12-19 15:00:53 +0000
@@ -235,6 +235,7 @@
 $DBI::dbi_debug = 0;
 $DBI::neat_maxlen = 400;
 
+=for comment
 # If you get an error here like "Can't find loadable object ..."
 # then you haven't installed the DBI correctly. Read the README
 # then install it again.
@@ -246,6 +247,10 @@
 else {
     bootstrap DBI;
 }
+
+=cut # (ALT) disabled DBI::PurePerl
+
+bootstrap DBI;
 
 $EXPORT_TAGS{preparse_flags} = [ grep { /^DBIpp_\w\w_/ } keys %{__PACKAGE__."::"} ];