I thought about this, but even:

my $user = 'somename';     
my $db ="test";
my $host="localhost";
$dbh->do(q{GRANT ALL ON ?.* TO ?@?}, {}, $db, $user, $host);
[download]

does not produce any improvement, same syntax error. I am quite perplex.