Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- function split(pString, pPattern)
- local Table = {}
- local fpat = "(.-)" .. pPattern
- local last_end = 1
- local s, e, cap = pString:find(fpat, 1)
- while s do
- if s ~= 1 or cap ~= "" then
- table.insert(Table,cap)
- end
- last_end = e+1
- s, e, cap = pString:find(fpat, last_end)
- end
- if last_end <= #pString then
- cap = pString:sub(last_end)
- table.insert(Table, cap)
- end
- return Table
- end
- term.clear()
- term.setCursorPos(1,1)
- print("MoAr Email System")
- term.setCursorPos(5,5)
- print("Username:")
- term.setCursorPos(5,6)
- local lusr = read()
- local file = http.get("http://localhost/rcv.php?data="..lusr)
- local hash = file:readAll()
- stuff = split(hash,"µ")
- print(stuff[2].."Has Sendet"..stuff[3].."mail ID is"..stuff[1])
- end
Advertisement
Add Comment
Please, Sign In to add comment