Lua HexDump from http://lua-users.org/wiki/HexDump

hex_dump.lua

function HexDump(buf)
	local s = {}
	s.output = ''
	for byte=1, #buf, 16 do
		local chunk = buf:sub(byte, byte+15)
		s.output = s.output .. string.format('%08X  ',byte-1)
		chunk:gsub('.', function (c) s.output = s.output .. string.format('%02X ',string.byte(c)) end)
		s.output = s.output .. string.rep(' ',3*(16-#chunk))
		s.output = s.output .. chunk:gsub('%c','.') .. "\n" 
	end
	return s.output
end