Select Code to Download

#!/usr/bin/perl
# Check the health of a mysql server.
...
             }
$sgv->finish();
}

print "********READ-WRITE RATIO********\n\n";
#The r/w ratio is of course (Com_select + Qcache_hits)/(Com_insert+Com
+_update+Com_delete+Com_replace)
...
$cu->finish();
$cd->finish();
$cr->finish();

mysql> show variables;
+---------------------------------+-----------------------------------
+-------+
...
| delayed_queue_size              | 1000                              
+       |
| expire_logs_days                | 0                                 
+       |