hhf/MySQLTuner-perl
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

failed to execute: SHOW SLAVE HOSTS #553

Browse source
This commit is contained in:
Jean-Marie Renouard 2021-07-02 16:41:36 +02:00
parent c9345a1380
commit 47cf0669fc
1 changed files with 18 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

23
mysqltuner.pl
View file

@ -1,5 +1,5 @@
#!/usr/bin/env perl
# mysqltuner.pl - Version 1.7.26
# mysqltuner.pl - Version 1.7.27
# High Performance MySQL Tuning Script
# Copyright (C) 2006-2021 Major Hayden - major@mhtx.net
#
@ -56,7 +56,7 @@ $Data::Dumper::Pair = " : ";
#use Env;
# Set up a few variables for use in the script
my $tunerversion = "1.7.26";
my $tunerversion = "1.7.27";
my ( @adjvars, @generalrec );
# Set defaults
@ -1167,10 +1167,23 @@ sub get_all_vars {
}
}
debugprint Dumper(@mysqlenginelist);
my @mysqlslave = select_array("SHOW SLAVE STATUS\\G");
my @mysqlslave;
if ($mysqlvermajor eq 8 or ($mysqlvermajor eq 10 and $mysqlverminor ge 5)) {
@mysqlslave = select_array("SHOW SLAVE STATUS\\G");
} else {
@mysqlslave = select_array("SHOW REPLICA STATUS\\G");
}
arr2hash( \%myrepl, \@mysqlslave, ':' );
$result{'Replication'}{'Status'} = \%myrepl;
my @mysqlslaves = select_array "SHOW SLAVE HOSTS";
my @mysqlslaves;
if ( $mysqlvermajor eq 8 or ($mysqlvermajor eq 10 and $mysqlverminor ge 5) ) {
@mysqlslaves= select_array "SHOW SLAVE HOSTS";
} else {
@mysqlslaves = select_array("SHOW SLAVE STATUS\\G");
}
my @lineitems = ();
foreach my $line (@mysqlslaves) {
debugprint "L: $line ";
@ -6498,7 +6511,7 @@ __END__
=head1 NAME
MySQLTuner 1.7.26 - MySQL High Performance Tuning Script
MySQLTuner 1.7.27 - MySQL High Performance Tuning Script
=head1 IMPORTANT USAGE GUIDELINES