diff --git a/mysqltuner.pl b/mysqltuner.pl index 88f297e..c7361c6 100755 --- a/mysqltuner.pl +++ b/mysqltuner.pl @@ -51,7 +51,7 @@ use Data::Dumper; $Data::Dumper::Pair = " : "; # Set up a few variables for use in the script -my $tunerversion = "1.6.2"; +my $tunerversion = "1.6.3"; my ( @adjvars, @generalrec ); # Set defaults @@ -658,7 +658,7 @@ sub mysql_setup { sub select_array { my $req = shift; debugprint "PERFORM: $req "; - my @result = `$mysqlcmd $mysqllogin -Bse "$req"`; + my @result = `$mysqlcmd $mysqllogin -Bse "$req" 2>>/dev/null`; chomp(@result); return @result; } @@ -667,7 +667,7 @@ sub select_array { sub select_one { my $req = shift; debugprint "PERFORM: $req "; - my $result = `$mysqlcmd $mysqllogin -Bse "$req"`; + my $result = `$mysqlcmd $mysqllogin -Bse "$req" 2>>/dev/null`; chomp($result); return $result; } @@ -3191,4 +3191,4 @@ along with this program. If not, see . # indent-tabs-mode: t # cperl-indent-level: 8 # perl-indent-level: 8 -# End: \ No newline at end of file +# End: