sub sizeOfDB {
   my $db = shift;
   my $size = 0;
   
   # No placeholders needed, so let selectall_* do the annoying stuff
   my $result = $db->selectall_arrayref('show table status');

   # Assume that the call succeeded, either check error or use {RaiseError=>1}
   foreach (@$result) { $size += $_->[6] + $_->[8] }

   return $size;
}