[svn:p5ee] r6556 - p5ee/trunk/App-Repository/lib/App/Repository

[email protected]
Newsgroups perl.cvs.p5ee
Message-ID <[email protected]>
Author: spadkins
Date: Tue Jun 20 14:07:43 2006
New Revision: 6556

Modified:
   p5ee/trunk/App-Repository/lib/App/Repository/MySQL.pm

Log:
cleaned up explain_sql

Modified: p5ee/trunk/App-Repository/lib/App/Repository/MySQL.pm
==============================================================================
--- p5ee/trunk/App-Repository/lib/App/Repository/MySQL.pm	(original)
+++ p5ee/trunk/App-Repository/lib/App/Repository/MySQL.pm	Tue Jun 20 14:07:43 2006
@@ -400,19 +400,18 @@
         }
         if ($sql =~ /^select/i) {
             my ($rows);
-print $sql;
             eval {
                 $rows = $dbh->selectall_arrayref("explain $sql");
             };
             print "EXPLAIN_SQL: $DBI::errstr\n";
             if ($rows) {
-                print "+----+-------------+-------+-------+-------------------------------------+-------------------+---------+-------------+------+-------+\n";
-                print "| id | select_type | table | type  | possible_keys                       | key               | key_len | ref         | rows | Extra |\n";
-                print "+----+-------------+-------+-------+-------------------------------------+-------------------+---------+-------------+------+-------+\n";
+                print "+----+-------------+-------+-------+---------------------------------------+--------------------+---------+-------------+-------+\n";
+                print "| id | select_type | table | type  | possible_keys                         | key                | key_len | ref         |  rows | Extra\n";
+                print "+----+-------------+-------+-------+---------------------------------------+--------------------+---------+-------------+-------+\n";
                 foreach my $row (@$rows) {
-                    printf("|%3s | %-12s| %-6s| %-6s| %-36s| %-18s|%8d | %-12s|%5d | %-6s|\n", @$row);
+                    printf("|%3s | %-12s| %-6s| %-6s| %-38s| %-19s|%8d | %-12s|%6d | %s\n", @$row);
                 }
-                print "+----+-------------+-------+-------+-------------------------------------+-------------------+---------+-------------+------+-------+\n";
+                print "+----+-------------+-------+-------+---------------------------------------+--------------------+---------+-------------+-------+\n";
             }
         }
         else {
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.