Perl script for checking MySQL database disk space usage (in GB)

#!/usr/bin/perl
# database size verification
use DBI;
use Getopt::Long;
#Commandline arguments
#my @cmdline = @ARGV;
#my $counts =@cmdline;
sub usage {
print STDERR @_, “n” if @_;
die <<EOF;
Usage: [ options ]
Options:
-?,  –help             show this help
-h,  –host=…         connect to host
-u,  –usr=…          user for login if not current user
-p,  Read more [...]

This script is used to check the user security in MySQL server.
Prerequisites: Perl modules : DBI, Getopt::Long and Text::Table

Script will check following details from mysql grant tables.

# Looks for anonymous user accounts
# Looks for accounts accessible from any host
# Looks for accounts with empty password
# Looks for accounts with identical (non empty) passwords
# Looks for accounts with admin privileges
# Looks for accounts with data definition privileges
# Looks for accounts with schema Read more [...]

According to my experience with scripting, shell scripting is completely different than any other scripting languages. While creating one script for database monitoring purpose, got stuck with weird error on string comparison. It looks like very easy but it took so much time for me to found the solution.

While comparing 2 strings in “IF” condition, got stuck with syntax error. After searching lots of things on google finally I have found the solution that we have to keep space before and after the Read more [...]