--- DBI-1.37/Makefile.PL~	2003-05-15 17:48:55 +0000
+++ DBI-1.37/Makefile.PL	2003-06-21 00:55:31 +0000
@@ -229,6 +229,7 @@ sub post_initialize {
     if ($cfg_privlibexp ne $cfg_sitelibexp) {
 	# this block could probably be removed now
 	my %old;
+=pod
 	File::Find::find( sub {
 	    local $_ = $File::Find::name;
 	    s:\\:/:g if $os eq 'MSWin32';
@@ -238,6 +239,7 @@ sub post_initialize {
 			      $_ eq $cfg_man3direxp );
 	    ++$old{$_} if m:\bDB(I|D$):; # DBI files, but just DBD dirs
 	}, $cfg_privlibexp, $cfg_archlibexp );
+=cut
 	if ( %old ) {
 	warn "
 Warning: By default new modules are installed into your 'site_lib'