From: Bernt Marius Johnsen
Date: October 27 2010 3:04pm
Subject: Faulty version check in foreign_key_info
List-Archive: http://lists.mysql.com/perl/4376
Message-Id: <4CC83F61.20906@oracle.com>
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1; format=flowed
Content-Transfer-Encoding: 7bit

The version check in foreign_key_info fails to check the minor version. 
The fix is easy, though:

--- a/lib/DBD/mysql.pm
+++ b/lib/DBD/mysql.pm
@@ -638,7 +638,7 @@ sub foreign_key_info {

      # INFORMATION_SCHEMA.KEY_COLUMN_USAGE was added in 5.0.6
      my ($maj, $min, $point) = _version($dbh);
-    return if $maj < 5 || ($maj == 5 && $point < 6);
+    return if $maj < 5 || ($maj == 5 && $min == 0 && $point < 6);

      my $sql = <<'EOF';
  SELECT NULL AS PKTABLE_CAT,