Select Code to Download

#!/usr/bin/perl -w
use strict;
...
print Dumper @logins;
}
exit;

$VAR1 = [
...
  "SELECT, INSERT, UPDATE, DELETE, CREATE, DROP, REFERENCES, INDEX, AL
+TER, CREATE TEMPORARY TABLES, LOCK TABLES, CREATE VIEW, SHOW VIEW, CR
+EATE ROUTINE, ALTER ROUTINE, EVENT, TRIGGER"
];

CREATE DATABASE "drupal"
    DEFAULT CHARACTER SET latin1
...
GRANT TRIGGER ON *.* TO "root"@'localhost' ;
GRANT EVENT ON *.* TO "root"@'localhost' ;
GRANT CREATE TABLESPACE ON *.* TO "root"@'localhost' ;