local text = "Q1NHSzBmYjg1Zjk1OTFmYTA3YTYxNTMzM2Q3YTQwNjBjYjli";
--
local map = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/";
local oct = {'001','010','011','100','101','110','111'};
oct[0]='000';
local octToBinary = function(n) return oct[math.floor(n/8)]..oct[(n%8)]; end;
local binary = "";
local x;
for a in text:gmatch('['..map..']') do -- only accept valid base64 characters
    x = map:find(a)-1;
    binary = binary..octToBinary(x);
end
print(binary);
local len = binary:len();
local s = "";
for i = 1, len, 8 do
    s = s..string.char(tonumber(binary:sub(i,i+7), 2))
end
print(s);