Help for this page

Select Code to Download


  1. or download this
    
use DBI;
...
    my $query = qq|GRANT ALL on $db.* TO ? IDENTIFIED BY ?|; 
    $dbh->do($query,undef,$auser,$pw) || die ("Could not do $query - E
+rror: $DBI::errstr");
###########################################
  2. or download this
    DBI->connect(testg1:164.xxx.x.xxx:yyyy) failed: Access denied for user
+: 'root@myhost' (Using password: YES) at create.pl line 19
cant connect