@@ -1175,6 +1175,7 @@ sub get_all_vars {
11751175 $result {' Storage Engines' }{$engine } = $2 ;
11761176 }
11771177 }
1178+
11781179 # debugprint Dumper(@mysqlenginelist);
11791180
11801181 my @mysqlslave ;
@@ -1457,7 +1458,8 @@ sub get_opened_ports {
14571458 $v ;
14581459 } @opened_ports ;
14591460 @opened_ports = sort { $a <=> $b } grep { !/^$/ } @opened_ports ;
1460- # debugprint Dumper \@opened_ports;
1461+
1462+ # debugprint Dumper \@opened_ports;
14611463 $result {' Network' }{' TCP Opened' } = \@opened_ports ;
14621464 return @opened_ports ;
14631465}
@@ -1864,6 +1866,7 @@ sub security_recommendations {
18641866 # Looking for Anonymous users
18651867 my @mysqlstatlist = select_array
18661868" SELECT CONCAT(QUOTE(user), '\@ ', QUOTE(host)) FROM mysql.user WHERE TRIM(USER) = '' OR USER IS NULL" ;
1869+
18671870 # debugprint Dumper \@mysqlstatlist;
18681871
18691872 # exit 0;
@@ -2363,6 +2366,7 @@ sub check_storage_engines {
23632366 # Parse through the table list to generate storage engine counts/statistics
23642367 $fragtables = 0;
23652368 foreach my $tbl (@tblist ) {
2369+
23662370 # debugprint "Data dump " . Dumper(@$tbl);
23672371 my ( $engine , $size , $datafree ) = @$tbl ;
23682372 next if $engine eq ' NULL' or not defined ($engine );
@@ -5363,6 +5367,7 @@ sub get_wsrep_options {
53635367 push @galera_options , ' wsrep_slave_threads = ' . $wsrep_slave_threads ;
53645368 @galera_options = remove_cr @galera_options ;
53655369 @galera_options = remove_empty @galera_options ;
5370+
53665371 # debugprint Dumper( \@galera_options );
53675372 return @galera_options ;
53685373}
@@ -5695,6 +5700,7 @@ sub mariadb_galera {
56955700 debugprint " WSREP: $key = $mystat {$key }" ;
56965701 }
56975702 }
5703+
56985704 # debugprint Dumper get_wsrep_options();
56995705}
57005706
@@ -6464,6 +6470,7 @@ sub file2string {
64646470}
64656471
64666472sub dump_result {
6473+
64676474 # debugprint Dumper( \%result ) if ( $opt{'debug'} );
64686475 debugprint " HTML REPORT: $opt {'reportfile'}" ;
64696476
0 commit comments