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

fix error on show last start/shutdowns

Browse source
This commit is contained in:
Sergei A Mamonov 2016-12-07 16:23:53 +03:00
parent 2861883432
commit d3ea7ea342
1 changed files with 13 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

18
mysqltuner.pl
View file

@ -1161,15 +1161,23 @@ sub log_file_recommandations {
infoprint scalar(@lastStarts). " start(s) detected in $myvar{'log_error'}";
my $nStart=0;
for my $startd (reverse @lastStarts[-10..-1]) {
my $nEnd = 10;
if (scalar(@lastStarts) < $nEnd) {
$nEnd = scalar(@lastStarts);
}
for my $startd (reverse @lastStarts[-$nEnd..-1]) {
$nStart++;
infoprint "$nStart) $startd";
}
infoprint scalar(@lastShutdowns). " shutdown(s) detected in $myvar{'log_error'}";
my $nShut=0;
for my $shutd (reverse @lastShutdowns[-10..-1]) {
$nShut++;
infoprint "$nShut) $shutd";
$nStart=0;
$nEnd=10;
if (scalar(@lastShutdowns) < $nEnd) {
$nEnd = scalar(@lastShutdowns);
}
for my $shutd (reverse @lastShutdowns[-$nEnd..-1]) {
$nStart++;
infoprint "$nStart) $shutd";
}
#exit 0;
}