mirror of
https://github.com/percona/percona-toolkit.git
synced 2025-09-27 16:12:04 +00:00
PT-63 WIP
This commit is contained in:
@@ -8504,11 +8504,13 @@ sub main {
|
||||
$slave_lag_cxns = $slaves;
|
||||
}
|
||||
if ($o->get('skip-check-slave-lag')) {
|
||||
my $servers_to_skip = $o->get('skip-check-slave-lag');
|
||||
my $slaves_to_skip = $o->get('skip-check-slave-lag');
|
||||
my $filtered_slaves = [];
|
||||
warn "------------------------------------------------";
|
||||
warn Data::Dumper::Dumper($o->get('skip-check-slave-lag'));
|
||||
warn "------------------------------------------------";
|
||||
for my $slave_to_skip (@$slaves_to_skip) {
|
||||
|
||||
warn "i>>>>------------------------------------------------";
|
||||
warn Data::Dumper::Dumper($slave_to_skip->{h});
|
||||
}
|
||||
}
|
||||
if ( $slave_lag_cxns && scalar @$slave_lag_cxns ) {
|
||||
print "Will check slave lag on:\n";
|
||||
|
Reference in New Issue
Block a user