FizzBuzz in Erlang

fb.erl

-module(fb).
-export([run/0, run/1, tell/1]).

run() -> lists:map(fun(L) -> io:format('~p ~n', [tell(L)]) end, lists:seq(1,100)).

run(N) -> lists:map(fun(L) -> io:format('~p ~n', [tell(L)]) end, lists:seq(1,N)).

tell(N) when N rem 15 == 0 -> 'FizzBuzz';
tell(N) when N rem 3 == 0 -> 'Fizz';      
tell(N) when N rem 5 == 0 -> 'Buzz';      
tell(N) when is_integer(N) -> N;  
tell(_) -> 'Fuck this'.