Help*** removing lines?

[ruler]

howdy
does anyone have a simple way of removing a line from a text file?
the type of file i want to use will hold all the nicks of all unregistered users in the hub.
as the user leaves the hub, the script hopfully will remove that nick from the list in the text file and as they enter it will add the nick.

thanks

[nErBoS]

Hi,

Try this one...

--Requested by ruler 
--Made by nErBoS

sBot = "User Logger"

arrUserLog ={}
fUserLog = "userlog.dat"

function Main()
	frmHub:RegBot(sBot)
	LoadFromFile(fUserLog)
end

function OnExit()
	SaveToFile(fUserLog , arrUserLog , "arrUserLog")
end

function NewUserConnected(user)
	arrUserLog[user.sName] = "logged"
end

OpConnected = NewUserConnected

function UserDisconnected(user)
	arrUserLog[user.sName] = nil
end

OpDisconnected = UserDisconnected

function Serialize(tTable, sTableName, sTab)
	assert(tTable, "tTable equals nil");
	assert(sTableName, "sTableName equals nil");

	assert(type(tTable) == "table", "tTable must be a table!");
	assert(type(sTableName) == "string", "sTableName must be a string!");

	sTab = sTab or "";
	sTmp = ""

	sTmp = sTmp..sTab..sTableName.." = {\n"

	for key, value in tTable do
		local sKey = (type(key) == "string") and format("[%q]",key) or format("[%d]",key);

		if(type(value) == "table") then
			Serialize(value, sKey, sTab.."\t");
		else
			local sValue = (type(value) == "string") and format("%q",value) or tostring(value);
			sTmp = sTmp..sTab.."\t"..sKey.." = "..sValue
		end

		sTmp = sTmp..",\n"
	end

	sTmp = sTmp..sTab.."}"
	return sTmp
end

function SaveToFile(file , table , tablename)
	writeto(file)
	write(Serialize(table, tablename))
	writeto()
end

function LoadFromFile(file)
	if (readfrom(file) ~= nil) then
		readfrom(file)
		dostring(read("*all"))
		readfrom()
	end
end

Best regards, nErBoS

[ruler]

thanks nErBoS
just what i was looking for :)
i spent hours searching the forum but couldnt find anything.
thanks again

regards

[nErBoS]

Hi,

Made a little update to clean the list if the HUB is shutdown...

--Requested by ruler 
--Made by nErBoS

sBot = "User Logger"

arrUserLog ={}
fUserLog = "userlog.dat"

function Main()
	frmHub:RegBot(sBot)
	LoadFromFile(fUserLog)
	CheckTable()
end

function OnExit()
	SaveToFile(fUserLog , arrUserLog , "arrUserLog")
end

function NewUserConnected(user)
	arrUserLog[user.sName] = "logged"
end

OpConnected = NewUserConnected

function UserDisconnected(user)
	arrUserLog[user.sName] = nil
end

OpDisconnected = UserDisconnected

function CheckTable()
	local usr,aux
	for usr, aux in arrUserLog do
		if (GetItemByName(usr) == nil) then
			arrUserLog[usr] = nil
		end
	end
end

function Serialize(tTable, sTableName, sTab)
	assert(tTable, "tTable equals nil");
	assert(sTableName, "sTableName equals nil");

	assert(type(tTable) == "table", "tTable must be a table!");
	assert(type(sTableName) == "string", "sTableName must be a string!");

	sTab = sTab or "";
	sTmp = ""

	sTmp = sTmp..sTab..sTableName.." = {\n"

	for key, value in tTable do
		local sKey = (type(key) == "string") and format("[%q]",key) or format("[%d]",key);

		if(type(value) == "table") then
			Serialize(value, sKey, sTab.."\t");
		else
			local sValue = (type(value) == "string") and format("%q",value) or tostring(value);
			sTmp = sTmp..sTab.."\t"..sKey.." = "..sValue
		end

		sTmp = sTmp..",\n"
	end

	sTmp = sTmp..sTab.."}"
	return sTmp
end

function SaveToFile(file , table , tablename)
	writeto(file)
	write(Serialize(table, tablename))
	writeto()
end

function LoadFromFile(file)
	if (readfrom(file) ~= nil) then
		readfrom(file)
		dostring(read("*all"))
		readfrom()
	end
end

Best regards, nErBoS

[ruler]

nice peice of code and works just fine  8)
thanks