Changeset 24
- Timestamp:
- 01/15/08 01:24:25 (10 months ago)
- Files:
-
- mysqltuner.pl (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
mysqltuner.pl
r23 r24 25 25 # Dave Burgess 26 26 # Jonathan Hinds 27 # Mike Jackson 27 28 # 28 29 # Inspired by Matthew Montgomery's tuning-primer.sh script: … … 250 251 foreach my $db (@dblist) { 251 252 chomp($db); 252 push (@tblist,`mysql $mysqllogin -Bse "SHOW TABLE STATUS FROM $db" | awk '{print \$2,\$7}'`);253 push (@tblist,`mysql $mysqllogin -Bse "SHOW TABLE STATUS FROM \\\`$db\\\`" | awk '{print \$2,\$7}'`); 253 254 foreach my $line (@tblist) { 254 255 $line =~ /([a-zA-Z_]*)\s*(.*)/; 255 if (defined $enginestats{$1}) { 256 $enginestats{$1} = $enginestats{$1} + $2; 256 my $engine = $1; 257 my $size = $2; 258 if ($size =~ /^\d+$/) { 259 $size = 0; 260 } 261 if (defined $enginestats{$engine}) { 262 $enginestats{$engine} = $enginestats{$engine} + $size; 257 263 } else { 258 $enginestats{$ 1} = $2;264 $enginestats{$engine} = $size; 259 265 } 260 266 }