web registration.. help

[Light]

I have found script for registration, but it on lua4, can someone translate it?

hubUsers = {}

function readfile(fName)
	local fHandle = openfile(fName, "r")
	if fHandle then local tmp = read(fHandle, "*a") closefile(fHandle) return tmp end
end

function parseUsers()
	local table = {n=0}
	local users = readfile("../temp.dat") assert(users, "parseUsers()")
	gsub(users, "(%S-)|(%C+)|(%d+)%c", function(name, pass, level) tinsert(%table, { sName = name, sPass = pass, iLevel = tonumber(level) }) end)
	return table
end

function updateUsers()
	local tmp = parseUsers()
	foreachi(tmp, function(id, user) %hubUsers[user.sName] = user.iLevel end)
end

function OnTimer()
	local tmp = parseUsers()
	if tmp then foreachi(tmp, function(id, user)
		if not hubUsers[user.sName] then AddRegUser(user.sName, user.sPass, user.iLevel) end end)
	end updateUsers()
end

function Main()
	updateUsers()
	SetTimer(60*100) StartTimer()
end