Erlang inteview question

erlang-interview-question.erl

%% Given the parsed HTML tree in the following format:
%%
%% Types HTML = [Element]
%%       Element = {Tag, [Attribute], [Element | Text]}
%%       Tag = atom()    % e.g. 'a', 'pre', 'p'
%%       Attribute = {Name, Value}
%%       Name = atom()
%%       Value = string()
%%       Text = iolist()
%%
%% Write the function with the following signature:
%%
%% strip_html(HTML) -> string().
%%
%% which strips the HTML formatting and just returns
%% the raw text contents of the given HTML tree.

example_data() -> {a, [{href, "http://fprog.ru/"}], [{b, [], ["An example text"]}]}.