Guest User

Untitled

a guest
Jan 22nd, 2018
92
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Perl 0.62 KB | None | 0 0
  1.  my $slavehash = $self->{handle}->selectrow_hashref(q{
  2.             SHOW SLAVE STATUS
  3.         });
  4.     if ((! defined $slavehash->{Seconds_Behind_Master}) &&
  5.         (lc $slavehash->{Slave_IO_Running} eq 'no')) {
  6.       $self->add_nagios_critical(
  7.           "unable to get slave lag, because io thread is not running");
  8.     } elsif (! defined $slavehash->{Seconds_Behind_Master}) {
  9.       $self->add_nagios_critical(sprintf "unable to get replication info%s",
  10.           $self->{handle}->{errstr} ? $self->{handle}->{errstr} : "");
  11.     } else {
  12.       $self->{seconds_behind_master} = $slavehash->{Seconds_Behind_Master};
  13.     }
Add Comment
Please, Sign In to add comment