my $sgv = $dbh->prepare("show variables");
$sgv->execute();
my $href = $sgv->fetchall_hashref('Variable_name');

my $var_to_print = 'back_log';
print $$href{$var_to_print}{'Value'};