charNums :: String -> [Int]
charNums = map fromIntegral . intVal . decodeLenient . B.pack
charNums :: String -> [Int]
charNums = map fromIntegral . intVal . decodeLenient . B.pack
charNums = map fromIntegral . intVal . decodeLenient . B.pack