--- DBD-DB2-1.78_orig\Makefile.PL	Mon Nov 16 06:19:06 2009
+++ DBD-DB2-1.78_patched2\Makefile.PL	Mon Mar 15 19:20:19 2010
@@ -101,7 +101,30 @@
       }
     }
   }
-  $sysliblist = qq(-L"$DB2LIB" db2cli.lib db2api.lib);
+  if (($Config{cc} =~ /gcc/) && ($^O eq 'MSWin32')) {
+    print STDERR <<EOF;
+################################## WARNING! ##################################
+# It seems that you are trying to install DBD::DB2 on a MS Windows box with
+# perl + gcc compiler (e.g. strawberry perl). As DB2 Application Development
+# Client for MS Windows does not support gcc compiler, we will try to create
+# required gcc compatible import libraries right now.
+#
+# GOOD NEWS: Chances for successful build are quite high!
+##############################################################################
+EOF
+    my $DB2BIN = "$DB2\\bin";  
+    unlink qw/libdb2api.a db2app.def libdb2cli.a db2cli.def/;
+    print "Gonna generate *.def files\n";
+    system qq[pexports "$DB2BIN\\db2app.dll" >db2app.def];
+    system qq[pexports "$DB2BIN\\db2cli.dll" >db2cli.def];
+    print "Gonna generate *.a files\n";
+    system qq[dlltool -D db2cli.dll -d db2cli.def -l libdb2cli.a];
+    system qq[dlltool -D db2app.dll -d db2app.def -l libdb2api.a];
+    $sysliblist = qq(-L. -ldb2cli -ldb2api);
+  }
+  else {
+    $sysliblist = qq(-L"$DB2LIB" db2cli.lib db2api.lib);
+  }
   my @libpaths = split /;/, $ENV{'LIB'};
   my $libpath;
   while( @libpaths )