ALL PRIVILEGES
ALTER 	ALTER ROUTINE
CREATE 	CREATE ROUTINE
CREATE TEMPORARY TABLES 	CREATE VIEW
DELETE 	DROP
EVENT 	EXECUTE
INDEX 	INSERT
LOCK TABLES 	REFERENCES
SELECT 	SHOW VIEW
TRIGGER 	UPDATE

##</code><code>##

#-------------------------------------------------------
# Clear User Table Then Add New Data From Delimited File
#-------------------------------------------------------
sub UpdateUserTable
{
my $dbh = shift;
my ($sth, $stmt);
    warn("Entered sub UpdateUserTable");
    $stmt =    "DELETE
                FROM users";

    $sth = $dbh->prepare ($stmt);
    $sth->execute () or die "Unable to execute query: " .    $sth->errstr;


    $stmt =    "LOAD DATA INFILE '/home/jalamior/public_html/httpsdocs/securefiles/accesscontrol.txt'
                INTO TABLE users
                FIELDS TERMINATED BY ',' LINES TERMINATED BY '\n'";


    $sth = $dbh->prepare ($stmt);
    $sth->execute () or die "Unable to execute query: " . $sth->errstr;
}

##</code><code>##

if ($action eq "updatetable_3")
{
    warn("Entered update_tables.cgi with action = UpdateTable_3");
	UpdateUserTable($dbh);
}